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AVANT-PROPOS 






L Amstrad CPC est 6quip6 d'un processeur Z 80, fonctionnant a 
4 megahertz et disposant d'un jeu destructions extremement puissant. 
En outre, la quality de son BASIC, tant du point de vue de la Vitesse 
que du nombre d'instructions, range cette machine parmi les plus 
performantes du marche\ 

II n'en reste pas moins que le BASIC sera toujours le BASIC, avec 
ses inconv<§nients et ses limites. Qui, par exemple, n'a pas eprouve 
d'ameres deceptions en voyant un mobile se trainer sur l'§cran, avec 
force soubresauts, au terme d'un programme d'animation en BASIC. 
De plus, on ne peut que regretter I'absence, sur I'Amstrad, d'instructions 
telles que PAINT, CIRCLE, etc. 

Le langage machine peut remedier a ces d6fauts. 

Lorsque vous travaillez en BASIC sur votre ordinateur, c'est un peu 
comme si vous teniez une conversation avec, disons, un Anglais, par 
traducteur interpose\ En effet, le processeur n'a pas la moindre idee de 
ce que signifient des choses telles que PRINT, LOCATE ou GOTO. Et 
pourtant, ca marche I Alors ? 

Alors il y a effectivement, quelque part dans la machine, un 
programme integre' qui traduit les instructions BASIC en langage 
machine, le seul compris par le Z 80. 

On voit done tout de suite l'inte>et qu'il peut y avoir a travailler 
directement en langage machine: pour reprendre I'exemple cite plus 
haut, votre conversation sera bien plus efficace et rapide si vous vous 
exprimez directement en anglais plutot que de passer par un interprets 

A titre d'exemple, voici deux versions, I'une en BASIC et I'autre en 
langage machine, d'un m§me programme qui colore I'ecran, 
Ne cherchez pas a comprendre ce programme pour I'instant. 

Programme BASIC 

10 X = 255 

20 MODE I : FOR 1 = 49152 TO 65535 

30 POKE l,X : NEXT 
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Vous pouvez faire varier la couleur en affectant a X, en ligne 10, 
une valeur quelconque de a 255. 

Programme en langage machine 

10 MODE 1 : MEMORY 40000 : X = 255 
20 FOR 1 = 40001 TO 40016 : READ a : POKE l,a : NEXT 
30 POKE 40008,X : CALL 40001 

40 DATA &21, &0, &40, &11, &FF, &BF, &3E, &0, &13, 
&12, &2B, &7C, &B5, &20, &F7, &C9 






La encore, vous pouvez faire varier la valeur de X entre et 255. 
Pour la mgme tSche, on peut constater que le programme BASIC met 
environ 36 secondes, alors que le m§me en langage machine met un 
peu plus de deux dixiemes de seconde ! 

Cette Vitesse d'execution va naturellement nous permettre des realisa- 
tions qui seraient impossibles en BASIC. 

II n'est bien entendu pas question pour nous de remplacer totalement 
le BASIC et d'ecrire de gigantesques programmes en langage machine, 
mais simplement d'apprendre a construire des petites routines (ou sous- 
programmes) que nous utiliserons comme s'il s'agissait d'instructions 
nouvelles. 

S'il est vrai que le langage machine est beaucoup moins tolerant que 
le BASIC en ce qui concerne les erreurs, et en d^pit de son aspect 
quelque peu rebarbatif pour le profane, vous vous rendez vite compte 
que le premier n'est pas beaucoup plus difficile a travailler que le 
second. 

Par ailleurs, et contrairement a ce que pourraient laisser croire un 
certain nombre d'ouvrages s'etendant avec complaisance sur le sujet, 
aucune connaissance particuliere de I'arithm^tique binaire, ou hexadeci- 
male n'est necessaire (a moins, bien sur, de vouloir devenir un 
specialiste). 

Le BASIC de I'Amstrad nous offre en effet deux precieuses fonctions 
capables d'effectuer pour nous toutes les conversions necessaires : il 
s'agit des fonctions HEX$ et BIN$, dont nous reparlerons. 

Tout au plus, concernant I'hexadecimal, vous faudra-t-il apprendre a 
distinguer un octet fort d'un octet faible. 

Ce probleme est aborde dans la Premiere Partie, consacree aux 
connaissances de base minimales a acquerir avant d'aborder la program- 
mation proprement dite. 
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1 

CONNAISSANCES DE BASE 



LA NOTATION HEXADECIMALE : 
OCTETS FORTS ET OCTETS FAIBLES 



II serait toujours possible, si on le souhaitait vraiment, de travailler 
en langage machine en fournissant a I'ordinateur des donn^es sous une 
forme que tout le monde connaTt : la notation decimale. 

Pour un certain nombre de raisons, cela n'est pourtant pas recom- 
mande. On peut en citer trois : 

• Certaines conversions en hexadecimal seraient de toute facon neces- 
saires lors de la conception du programme. 

• La numeration en hexadecimal prend moins de place que celle en 
decimal (pour les nombres sup£rieurs a 99 en particulier). 

• Tous les ouvrages sans exception ayant trait a ce sujet ou a un sujet 
approchant se servent de la notation hexadecimale, Autant done s'y 
habituer tout de suite... 

Pour decouvrir de quoi il s'agit exactement, commencez par taper 
ceci sur votre machine (le mode direct suffira, e'est-a-dire qu'il est 
inutile de mettre un num£ro de ligne) : 

PRINT HEX$ (43870) 

La r6ponse qui s'affiche est: AB5E. La fonction HEX$ a transform^ 
la representation decimale de 43870 en sa representation hexadecimale. 
Les deux chiffres ou lettres de droite sont appeies V octet de poids 
faible, et les deux de gauche I' octet de poids fort (dans I'exemple, 
I'octet de poids faible est 5E et I'octet de poids fort AB). 

II faut noter que I'ordinateur ne prend pas la peine d'ecrire les 
eventuellement situes a gauche du dernier chiffre ou de la derniere 
lettre. 



Exemples 

2060 est represente en hexadecimal par 80C, qui est l'6quivalent de 
080C. L'octet de poids faible est done 0C et I'octet de poids fort 8. 

HEX$ (255) = FF, ce qui est Equivalent de 00FF. Dans ce cas, I'octet 
de poids faible est FF et I'octet de poids fort (ou, si Ton veut, il n'y a 
pas d'octet fort — nous verrons toutefois que la nuance peut etre 
importante). 
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La conversion inverse (hexadecimal — decimal) peut s'effectuer de 
la maniere suivante : 

Nombre en decimal = octet de poids faible + (256 * octet de 
poids fort) 

Exemple 

HEX$ (648) = 288 et &88 + 256 * &2 = 648 

£e signe & signale a 1'ordinateur que le chiffre qui lui est transmis 
est en notation hexadicimale. 

II faut enfin signaler que I'on ne peut representer en hexadecimal 
que des nombres de - 32768 a 65535. 

Les nombres negatifs posent toutefois un probleme particulier, que 
nous laisserons de c6te, puisqu'il ne se pr^sentera pas dans nos 
programmes. Neanmoins, pour ceux que cela interesse, qu'ils sachent 
que : 

1. La representation hexadecimale des nombres allant de — 32768 a 
- 1 est la meme que celle des nombres de 32768 a 65535 (exemple : 
HEX$ (- 21) = FFEB et HEX$ (65515) = FFEB). 

2. Pour faire la conversion hexadecimal — decimal, il existe done en 
realite deux possibility : 

• Si Ton ne veut pas tenir compte du signe (si Ton sait par exemple 
que le nombre est positif), on utilise la formule presentee plus haut. 

• Si I'on veut tenir compte du signe, il faut utiliser une fonction qui a 
pour nom UNT. 



Exemple 

U 

Mais, repetons-le, tout cela n'a pour le moment aucune importance. 



UNT (&FFEB) = - 21 et &EB + 256 * &FF - 65515 



LES REGISTRES SIMPLES 



Pour en donner une idee claire, on pourrait dire que la programmation 
en langage machine consiste pour une grande part en une manipulation 
de differentes "boTtes" dans lesquelles il est possible de mettre des 
valeurs, et que I'on peut par exemple additionner et soustraire entre 
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elles. Chacune de ces boTtes, que I'on appelle registre, a un nom. Nous 
nous inte>esserons pour I'instant a sept de ces registres : A, B C D E 
HetL. 

Pour information, prgcisons que le registre A s'appelle egalement 
Yaccumulateur. 

Ces registres simples, pour utiles qu'ils soient, ont pourtant un grave 
defaut : on ne peut y mettre que des nombres de a 255. C'est pourquoi 
il existe Egalement les registres doubles. 



LES REGISTRES DOUBLES 



Ce sont, en fait, des registres simples mis deux a deux. Nous en 
utiliserons trois : BC, DE et HL. 

Dans ces registres doubles, on pourra mettre des nombres jusqu'a 
65535. C'est la que vont intervenir les notions d'octet faible et d'octet 
fort. 

Pour mettre par exemple la valeur &AB5E (43870 en decimal) dans le 
registre HL, il faudra mettre (on dit aussi charger) I'octet fort de cette 
valeur dans H et I'octet faible dans L. Une fois charge^ HL se presentera 
done comme ceci : 



H 



AB 


5E 



Autres exemples 
&80C (2060) dans BC : 



&D2 (210) dans DE: 






B 


C 


8 


OC 


D E 





D2 






Ce dernier exemple amene une remarque importante : pour charger 
un registre double avec un nombre infeYieur ou egal a 255 (done n'ayant 
pas d'octet fort), il faut consid4rer que I'octet fort vaut et le charger 
dans le registre correspondant. 

Pour conclure, signalons enfin que nous serons amends a nous servir 
egalement d'un registre double un peu particulier, le registre IX. Ce 
registre est appeld le registre d'index. 
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LA PILE 

■^ ^ j^h 

Pour nous, la pile ne sera rien de plus que ce que son nom indique : 
un certain nombre de donnees empilees les unes sur les autres. Peu 
importe de savoir comment elle est geree par la machine, I'essentiel 
etant de savoir I'utiliser. 

Traditionnellement, la comparaison utilisee pour parler de la pile est 
celle de la pile d'assiettes, et il faut reconnaTtre qu'il est difficile de 
trouver mieux. 

Imaginons que vous soyez en train de faire la vaisselle. Vous lavez 
d'abord une assiette rouge que vous posez quelque part en attendant 
le rincage. Vous en lavez ensuite une bleue que vous posez sur la 
rouge, puis une jaune que vous posez sur la bleue. Le lavage termine, 
vous attaquez maintenant le ringage. Si vous prenez vos assiettes 
comme elles se presentent sur la pile, la premiere a etre rincee sera la 
derniere qui a ete posee, en I'occurrence la jaune. 

C'est le principe de base de la pile : dernier element entre, premier 
element sorti (en anglais, c'est une pile LIFO Last In/First Out). 

Si, par superstition ou par fantaisie, vous aviez absolument voulu 
rincer I'assiette rouge d'abord, il vous aurait au prealable fallu soulever 
la jaune et la bleue pour prendre la rouge. 

Dans nos programmes, nous utiliserons souvent la pile pour y stacker 
provisoirement des donnees, car c'est un moyen commode et rapide. 
Son fonctionnement peut paraTtre simple, pour ne pas dire simplet, 
mais vous verrez que Ton a vite fait de s'y perdre, si Ton n'y prend pas 
garde, lorsque les donnees s'accumulent. 

De plus, il faut savoir (et ne jamais I'oublier) que le processeur, de 
son c6te, se sert lui aussi de la pile pour faire son travail, et qu'il ne 
doit pas y avoir d'interference entre vous et lui. Nous en reparlerons... 



LE REGISTRE D'INDICATEURS 

C'est un registre que nous n'utiliserons pas directement et, la encore 
inutile de s'encombrer de details superflus. II suffit de nous imaginer 
ce registre comme une bofte comportant huit cases, ou indicateurs, 
ayant chacune un numero, et parfois un nom : 



7 


6 


5 


4 


3 


2 


1 





S 


Z 


— 


H 


— 


P/V 


N 


c 
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Dans chacune de ces "cases", il peut y avoir 1 ou : on dit que tel 
indicateur est mis a 1 ou 0. 

Nous ne toucherons jamais au contenu de ce registre, c'est I'affaire 
personnelle du processeur. Nous ne nous interesserons qu'aux indicateurs 
7 ou 6 dont voici le r6le : 

Tout au long du deroulement d'un programme, et apres certaines 
operations, le processeur met les indicateurs 6 et 7 a 1 ou a 0, en 
fonction du resultat. 

• Si le resultat de ('operation est nul, I'indicateur 6 sera mis a 1. Sinon, 
il sera mis a 0. (Le mot operation doit etre pris ici au sens large. Une 
comparaison entre valeurs est par exemple une operation au mgme 
titre qu'une addition.) 

• Si Je resultat de I'operation est positif, I'indicateur 7 sera mis a 1. S'il 
est negatif, I'indicateur 7 sera mis a 0. 

L'indicateur 6 est appele I'indicateur de zero (Z), et le 7 I'indicateur 
de signe (S). 

Encore une fois, tout cela est gere par la machine et nous n'aurons 
pas a nous en preoccuper. L'inte>§t est neanmoins evident : comme il 
existe des instructions permettant de tester les indicateurs, nous pourrons 
effectuer des branchements conditionnels du genre : "Si I'indicateur 7 
est a 1, alors il faut faire ceci ou cela..." 

C'est en fait exactement comparable a ^instruction IF du BASIC. 

Remarque 

Certaines operations n'entraTnent aucune modification des indicateurs, 
et cela quel que soit le resultat. En outre, certaines instructions 
conditionnelles ne peuvent s'utiliser qu'en fonction par exemple de 
I'indicateur 6, et non pas en fonction du 7 (ou vice versa). 

Tout cela est precise dans la cinquieme partie qui resume et explique 
d'une maniere formelle une partie des instructions du Z 80. 



LA MEMOIRE 

Le CPC est un ordinateur ayant une RAM (memoire vive) de 64K, ce 
qui signifie 64x1 024 = 65 536 octets ou cases memoire, ayant chacune 
une adresse de a 65535. 

En r^alite, une partie de ces cases memoire est r^servee a des choses 
comme la gestion de I'ecran ou I'interpr6teur BASIC, et il ne reste a 
I'utilisateur que 43 536 octets (de I'adresse 368 a 43903), c'est-a-dire pas 
tout a fait 43K. 
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Lorsque vous ecrivez un programme BASIC, il est code par la machine 
et stocke a partir de I'adresse la plus basse (368). Plus le programme 
s'allonge, plus la memoire se remplit. En outre, il peut arriver que 
I'execution d'un programme necessite des cases memoire dans les 
adresses les plus hautes (43903 et au-dessous). 

Le probleme, c'est qu'il nous faudra disposer, pour nos programmes 
en langage machine, d'une zone protegee ou nous pourrons les loger, 
et ou ils ne courront pas le risque d'etre deranges ou "ecrases" par le 
BASIC. Nous allons nous servir pour cela de I'instruction MEMORY, 
qui permet de fixer librement une limite que le BASIC ne pourra en 
aucun cas franchir. Si par exemple nous tapons : 

MEMORY 10000 

les cases memoire allant de 10001 a 43903 resteront vierges de toute 
intrusion, et le BASIC restera confine entre les adresses 368 et 10000. II 
ne s'agit la que d'un exemple, et nous n'aurons fort heureusement pas 
a reserver des zones de memoire aussi importantes. Un programme en 
langage machine de 500 octets, par exemple, represente deja un 
programme tout a fait considerable. Ceux que nous vous proposerons 
dans cet ouvrage toument autour de 100 ou 200 octets. Un MEMORY 
43600 serait done tout a fait suffisant, la perte de memoire negligeable, 
et rapidement amortie. 

Nous utiliserons I'espace memoire ainsi menage de deux manieres : 
d'une part pour y ecrire nos instructions, et d'autre part, bien que plus 
rarement, pour y stocker des donnees. 

A cet egard, une case memoire fonctionne un peu comme un registre, 
puisqu'on ne peut y mettre que des nombres infe>ieurs ou egaux a 255. 
Pour y mettre des nombres superieurs, il faudra utiliser deux cases 
memoire et mettre dans I'une I'octet faible et dans I'autre I'octet fort. 

II importe des a present de bien distinguer I'adresse d'une case 
memoire de son contenu. 

Exemple 



&D1 



&B0 



Case memoire d'adresse 43000 (&A7F8) 
Case memoire d'adresse 43001 (&A7F9) 



La case memoire d'adresse 43000 contient la valeur &D1, et celle 
d'adresse 43001 contient la valeur &B0. 

Traditionnellement, le contenu d'une case memoire d'adresse n s'ecrit 
(n). On peut done ecrire : (43000) = &D1 et (43001) = &B0. 
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LES INSTRUCTIONS DU Z 80 



Le processeur Z 80 possede un nombre considerable destructions 
de base : 158. Pour ce qui nous concerne, nous nous contenterons d'en 
utiliser 35, et vous pourrez constater qu'avec ce nombre n§duit, il est 
deja possible de faire un certain nombre de choses. 

Une instruction se presente sous la forme d'un ou plusieurs nombres 
que nous ecrirons sous la forme hexadecimale. Ces nombres sont 
toujours infe>ieurs ou 6gaux a 255. 

Deux exemples 

&19 signifie : "Additionner les registres HL et DE". 

&DD, &2B signifie : "Decrementer (= enlever 1) le registre IX". 

Physiquement, un programme en langage machine se presente done 
tout simplement comme une serie de nombres, ecrits dans des cases 
m^moire les uns a la suite des autres. 



LES ROUTINES DU SYSTEME SEXPLOITATION 



Le CPC n'est pas un ego'iste, et il nous offre la possibility, 6 combien 
preaeuse, d'acceder aux routines de son systeme d'exploitation. Ces 
routines, ou sous-programmes, font partie des programmes integres qui 
permettent a I'ordinateur de fonctionner. Chacune d'elles ayant une 
adresse bien precise, elles peuvent Stre appel«§es exactement de la 
meme maniere que I'on appelle un sous-programme en BASIC grace a 
I'instruction GOSUB, 

Cette possibility nous 6pargnera un travail considerable, puisque nous 
allons utiliser abondamment ces routines "prgtes a I'emploi". 

Si, par exemple, nous avons besoin de calculer le sinus d'un angle, il 
suffit d'appeler la routine d'adresse &BD88. Bien entendu, il faut savoir, 
pour chacune d'entre elles, quelles sont les modalites d'appel (pour 
reprendre I'exemple precedent, oil faut-il mettre la valeur de I'angle 
avant d'appeler la routine sinus, et ou se trouve le r6sultat lors du 
retour de cette routine ?). 

Tout cela est explique au fur et a mesure pour les routines que nous 
utiliserons, et en Annexe V pour celles que nous n'utiliserons pas, mais 
qui peuvent vous servir pour vos propres programmes. 
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II 






LE LANGAGE MACHINE 






COMMENT IMPLANTER UN PROGRAMME 

EN LANGAGE MACHINE 

Nous allons nous servir, pour illustrer cette section, du programme 
propose dans I'avant-propos, et qui colorait I'ecran (cette fois, pourtant, 
nous n'y incluerons pas la possibility de faire varier X). 

10 MODE 1 : MEMORY 40000 

20 FOR 1 = 40001 TO 40016 : READ A : POKE I, A : NEXT 
30 CALL 40001 

40 DATA &21, &0, &40, &11, &FF, &BF, &3E, &FF, &13, 
&12, &2B, &7C, &B5, &20, &F7, &C9 

La ligne 10, outre qu'elle initialise I'ordinateur en model, nous 
interesse surtout parce qu'elle protege une zone de memoire, a partir 
de I'adresse 40000. 

La ligne 20 ecrit le programme dans une zone de 16 octets : 

1 . La boucle demarre en 40001 . 

2. La premiere donnee stocked en DATA est ecrite dans cette case 
memoire. 

3. La deuxieme boucle commence : la deuxieme donnee stockee en 
DATA est ecrite en 40002, et ainsi de suite. 

Une fois le programme ecrit en memoire, il ne reste plus qu'a 
I'appeler gr§ce a I'instruction CALL, suivie de son adresse (c'est-a-dire 
I'adresse de la premiere de ses instructions, en I'occurrence 40001). 
Deux remarques s'imposent : 

• La longueur de la zone a proteger depend bien evidemment de la 
longueur du programme a y implanter (dans notre cas, un MEMORY 
43887 aurait pu suffire, puisque notre programme ne fait que 
16 octets). 

• II n'est necessaire et suffisant que d'executer le programme de 
chargement une seule fois. Lorsqu'il est charge^ on peut I'appeler 
grSce a CALL autant de fois que I'on veut. 

Une petite astuce nous evitera dorenavant d'avoir a mettre le sigle & 
devant chacune des donnees de la ligne de DATA. II suffit de remplacer 
la ligne 20 par : 
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20 FOR 1 = 40001 TO 40016 : READ A$ : POKE I, 
VAL("&H" + A$) : NEXT 

Un dernier conseil enfin, avant de clore le sujet : vous vous rendrez 
vite compte que rien ne se produit plus facilement, lorsqu'un programme 
est assez long, qu'une ou deux erreurs lors de la copie des lignes de 
DATA. Or, les consequences d'une erreur dans un programme en 
langage machine sont parfois lourdes (nous y reviendrons). C'est 
pourquoi la ligne suivante, inse>ee juste apres la boucle de chargement, 
permet en principe de signaler ce genre d'erreur : 

25 W = 0: FOR l = Adresse de depart TO adresse de fin: 
W = W + PEEK(I): NEXT: IF Wo Verification THEN 
PRINT "Erreur de data" : END 

Pour I'exemple precedent, adresse de depart=40001, adresse d'arri- 
vee = 40016, et verification = 1742. 

La valeur de verification varie bien sQr selon le programme, elle sera 
donnee pour chacun de ceux que nous 6tudierons. 



LES PARAMETRES TRANSMISSIBLES 

Si I'instruction CALL ne pouvait §tre utilised que sous la forme que 
nous avons vue pr^cedemment, il est bien evident qu'elle serait d'un 
emploi tres limite. 

Imaginons par exemple que nous fabriquions une routine chargee de 
dessiner des carr6s. Nous aimerions certainement pouvoir indiquer que 
nous voulons un carr6 dont les c6tes auront telle ou telle longueur, et 
qui sera situe a tel endroit de I'ecran. 

L'instruction CALL permet de transmettre ce genre d'indications 
(parametres) sous la forme suivante : 

CALL adresse du programme, X, X1, X2, X3,... 

On peut ainsi transmettre jusqu'a 32 parametres I 
Reprenons I'exemple du carre\ L'appel de la routine pourrait se 
presenter ainsi (ne pas oublier les virgules) : 

CALL adresse, X, Y, L 

X et Y seraient les coordonn6es du coin supe>ieur gauche de notre 
carre\ et L la longueur des cotes. 
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Ainsi done, avec un seul programme, nous pourrions dessiner n'im- 
porte quel carn§. 

II ne faut pas etre sorcier pour en deduire que nous devrons, pour 
pbuvoir utiliser ces parametres, §tre capables de localiser I'endroit ou 
ils sont ranges en memoire. C'est a cela que nous servira le registre IX. 

Considerons d'abord le cas le plus simple, I'instruction CALL suivie 
d'un seul parametre : 

GALL adresse, X 

Precisons tout de suite que I'ordinateur va systematiquement reserver 
deux cases memoire pour ranger chaque parametre, au cas ou ils 
seraient superieurs a 255. 

Notre parametre X se presentera done quelque part en memoire sous 
la forme : 



Octet faible 
deX 



Octet fort 
deX 



Case memoire d'adresse A 



Case memoire d'adresse A + 1 



A ce propos, il est important de noter que, lorsqu'un nombre est 
ecrit en memoire, I'octet faible est tou jours Sent avant le fort. 

Pour en revenir a ce parametre X, le probleme est done de savoir ou 
il se trouve, en d'autres termes, de trouver son adresse A. 

Ce probleme est resolu facilement quand on sait que cette adresse 
est automatiquement chargee dans le registre IX au moment de I'appel 
du programme (on dit que IX est pointe sur A) : 



Octet faible 
deX 



Octet fort 
deX 



Case memoire d'adresse IX 



Case memoire d'adresse XI + 1 



Cela peut §tre formule de differentes manieres : 

• Octet faible de X = contenu de la case memoire dont I'adresse est 
dans IX (on dit "adressee par IX"). 

• Octet fort de X = contenu de la case memoire adressee par IX + 1. 

Ou encore : 
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• Octet faible de X = (IX) et octet fort de X = (IX + 1). 

Comme il est obligatoire d'utiliser IX avec ce qu'il est convenu 
d'appeler un defacement, nous 6crirons (IX + 0) au lieu de (IX), ce qui 
revient exactement au meme. 

Voyons maintenant un cas plus complexe avec, par exemple, trois 
parametres : 

CALL adresse, X, X1, X2 

lis seront ranges en memoire de la maniere suivante : 



adresse IX + 
adresse IX + 1 
adresse IX + 2 
adresse IX + 3 
adresse IX + 4 
adresse IX + 5 



On remarquera que le dernier parametre est range" le premier dans la 
m<§moire. 

Imaginons maintenant qu'au cours d'un programme nous voulions 
charger le parametre X1 dans le registre HL. II nous suffirait de charger 
(IX + 3) dans H et (IX + 2) dans L. Bien entendu, il existe des instructions 
pour cela. 

Une bonne comprehension du processus 6tant importante, voici un 
exemple concret avec quatre parametres : 

CALL adresse, 300, 1 20, 5000, 

(Rappelons que HEX$(300) = 12C, HEX$(120) = 78, HEX$(5000) = 1388 
et que HEX$(0) = 0.) 

Ces parametres se presenteront ainsi en memoire : 





Octet faible 
deX2 




Octet fort 
deX2 




Octet faible 
deX1 




Octet fort 
deX1 




Octet faible 
deX 




Octet fort 
deX 
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5000 



120 



300 



88 



13 



78 



2C 



adresse IX + 
adresse IX + 1 
adresse IX + 2 
adresse IX + 3 
adresse IX + 4 
adresse IX + 5 
adresse IX + 6 
adresse IX + 7 



Si nous voulons par exemple charger le registre DE avec le troisieme 
parametre, en I'occurrence 5000 (&1388), il nous faut charger I'octet 
fort dans D et I'octet faible dans E : 

(IX + 3) dans D et (IX + 2) dans E 

Precisons enfin que le nombre de parametres transmis est charge, 
lui, dans le registre A (accumulateur) au moment de I'appel du 
programme. Nous verrons que cela peut etre tres utile. 



LES PRECAUTIONS INDISPENSABLES 

Le langage machine n'est pas d'un maniement aussi aise que le 
BASIC, et si vous ne voulez pas §tre rapidement et a tout jamais 
decourage, vous ferez bien de tenir compte des conseils suivants : 

• N'oubliez pas de prot^ger votre zone d'implantation grace a ('instruc- 
tion MEMORY. De plus, faites bien attention que votre programme 
ne "dSborde" pas de I'adresse 43903. Evitez egalement d'implanter 
vos programmes dans des zones inferieures a 16384, cela vous 
6pargnera des desagr6ments dont il serait trop long de parler ici. 

• Enregistrez syst4matiquement vos programmes avant de les essayer. 
Le langage machine reagit parfois extrSmement mal aux erreurs. Une 
seule petite faute, et vous risquez de voir le programme que vous 
avez mis deux heures a rentrer s'atomiser et se perdre d6finitivement 
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dans les entrailles de la machine (en tout 6tat de cause, et quoi que 
vous fassiez, sachez quand meme que vous ne risquez en aucun cas 
de d^traquer votre ordinateur). 

II arrive souvent, lorsqu'un programme se "plante", que rien ne se 
passe et que le clavier ne r6agisse plus. Dites-vous bien qu'il s'agit 
toujours d'une erreur de conception (inutile d'accuser la machine, elle 
ne fait jamais d'erreur), et que I'ordinateur doit etre branche" sur une 
boucle malsaine dont il ne peut plus sortir. Dans ce cas-la, une seule 
solution : £teindre et rallumer. 

• Tenez la pile sous haute surveillance. Comme il a 6t6 dit pr6c£dem- 
ment, la pile est souvent un moyen- commode pour stocker des 
donn^es. Mais n'oubliez pas que I'ordinateur s'en sert 6galement de 
son c6te\ et voici de quelle maniere : 

Nous avons deja compart I'instruction CALL a I'instruction GOSUB, 
la seule difference 6tant que la premiere appelle un sous-programme 
en langage machine, et la seconde un sous-programme en BASIC. 

De la m§me maniere qu'un sous-programme en BASIC doit toujours 
se terminer par un RETURN, un programme en langage machine doit 
toujours se terminer par une instruction de retour. Des qu'une telle 
instruction est rencontr^e, I'ordinateur quitte le langage machine et 
retourne ex6cuter I'instruction situee imm§diatement derriere I'instruc- 
tion CALL, puis poursuit normalement le programme BASIC. Cela n'est 
possible que parce que, au moment oil il a rencontre" I'instruction CALL, 
il a stocke I'adresse de la suivante sur la pile, en provision du retour. 

Cette adresse, il s'attend done a la retrouver sur la pile au moment 
du retour. Si un "tripotage" intempestif de la pile I'a entre-temps 
d£natur£e sans la remettre en etat, I'ordinateur r£cupe>era une donn^e 
fausse et le programme va sauter n'importe ou. La regie d'or est done: 
Au moment du retour d'un sous-programme en langage machine, la 
pile doit §tre dans le m§me itat qu'au moment de I'appel de ce sous- 
programme. 

Vous verrez que cette regie n'est pas tres difficile a appliquer pour 
peu que I'on fasse preuve d'un minimum de rigueur et de minutie. 

Lorsque j'utilise beaucoup la pile, je me sers pour ma part d'un petit 
"true" aussi simple qu'efficace : je manipule physiquement une pile 
faite de petits cartons que j'entasse les uns sur les autres, ou au 
contraire que j'enleve de la pile en m§me temps que mon programme. 
Le premier carton a Stre systematiquement depose" est bien sur intitule" 
"adresse de retour du programme". Quand le programme s'acheve, e'est- 
a-dire au moment ou I'instruction de retour au BASIC est rencontr£e, il 
ne doit plus rester d'autre carton au-dessus de celui-la. Si e'est le cas, 
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je rajoute, avant I'instruction de retour, les instructions necessaires pour 
les faire disparattre. 

Cette histoire de pile est reellement tres importante. Combien de 
debutants se sont arrache les cheveux devant des programmes qui se 
plantaient, alors qu'il s'agissait tout simplement d'un probleme de pile ! 

C'est sur ce dernier conseil que s'achevent les deux premieres parties. 
Vous en savez maintenant assez pour vous attaquer au premier 
programme. 
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Ill 

EXEMPLES DE PROGRAMMES 



1. PAUSE DE X SECONDES 



Nous allons, pour votre bapteme du feu, nous attaquer a un 
programme bien modeste, puisqu'il ne comprend que 23 octets. II 
permettra d'effectuer des pauses de longueur variable, et remplacera 
avantageusement les boucles de temporisation laborieuses et imprecises 
que I'on est oblige d'utiliser sur I'Amstrad. 

Ce programme debute a I'adresse 43880, finit en 43902 (chiffre de 
verification : 2976), est relogeable (ce qui veut dire que I'on peut 
I'implanter ailleurs en memoire si I'on veut ce qui n'est pas le cas de 
tous les programmes, nous le verrons plus tard), et son format d'appel 
est le suivant : 

CALL 43880,X 

Le parametre X determine, en secondes, la longueur de pause desiree. 
Voici les conventions de la presentation du listing : 
La premiere colonne indique des numeros de ligne qui ne servent a 
rien d'autre qu'aux explications. La deuxieme indique I'adresse du 
premier octet du code machine de cette ligne (cette adresse est 
egalement fournie en hexadecimal si, pour une raison ou pour une 
autre, elle est remarquable). La troisieme colonne, sans titre, sert a 
visualiser les sauts eventuels. La quatrieme indique les instructions du 
programme (en hexadecimal, bien sur), et la cinquieme les mnemoniques 
de ces m§mes instructions (les mnemoniques sont simplement des 
representations symboliques des differentes instructions, dont il est plus 
facile de se souvenir que des codes machine). 

Rappelez-vous enfin que toutes ces instructions sont decrites en 
detail, le cas echeant avec leurs variantes, dans la Cinquieme Partie. 
N'hesitez pas a vous y reporter si besoin est. 
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LIGNE 






1 
2 
3 

4 
5 
6 

7 
8 

9 

TS- 
ll 
12 

14 
15 



ADRESSE DU ler CODE 
DE CETTE LIGNE 



DEC. 

43880 
43883 
43886 
43887 



43888 
43891 
43892 
43893 
43894 



43896 
43897 
43898 
43899 
43900 
43902 



HEXA. 



CODE-MACHINE MNEMONIQUE 



DO, 66,1 

DD,6E,0 

29 

E5 



c 



El 

28 

7C 

B5 

20, Fl 

C9 



LD H, (IX+1) 
LD L, (IX+O) 
ADD HL.HL 
PUSH HL 



21,56 


FE 


LD HL, 65110 


2B 




DEC HL 


7C 




LD A,H 


B5 




OR L 


20, FB 




JR NZ.-5 



POP HL 
DEC HL 

LD A,H 
OR L 

JR NZ.-15 
RET 



Le principe de ce programme est exactement le meme que celui 
d'une boucle de temporisation en BASIC : nous allons demander a 
I'ordinateur... de ne rien faire, mais un grand nombre de fois, pour faire 
"passer le temps". 

En reality, nous nous servirons de deux boucles, pour une 1 raison que 
vous comprendrez plus loin. Nous allons tout d'abord nous interesser a 
la boucle constitute par les lignes 5 a 9, qui dure exactement une 
demi-seconde : 

Ligne 5 

Chargement du registre HL avec le nombre 65110 (&FE56). Vous 
remarquerez qu'apres le code de chargement (&21), on met d'abord 
I'octet faible de la valeur a charger, et ensuite I'octet fort (signalons 
egalement que pour charger un registre double, I'octet fort doit toujours 
§tre indique, m§me s'il est egal a 0). Pourquoi ce nombre 65110 ? II a 
et6 determine par essais successifs, de maniere que cette boucle 
centrale dure une demi-seconde (a quelques milliemes pres). 

Ligne 6 

Decrementation du registre HL, ce qui signifie que I'on enleve 1 au 
contenu de ce registre. 

Ligne 7 

Chargement du registre A (ou accumulateur) avec le contenu du 
registre H (done avec I'octet fort du contenu de HL). 
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Remarque 

Le contenu de H n'est pas modifte apres I'instruction. D'une maniere 
g£nerale, les instructions de chargement n'affectent jamais le contenu 
de la source. 



Ligne 8 

Litteralement "Execution d'un OU logique entre le registre L et le 
registre A". II faut savoir que le r6sultat d'un OU logique entre un 
registre et I'accumulateur n'est 6gal a que si le contenu de ces deux 
registres est 6gal a 0. 

Comme A est charge" avec le contenu de H, c'est exactement comme 
si nous faisions un OU logique entre H et L (ce qui n'est pas possible 
directement). Cette ligne 8 aura done pour r6sultat0 quand et seulement 
quand H et L seront 6gaux a 0, done quand HL sera vide. 

Ligne 9 

Elle signifie "Saut relatif de -5 si non nul", e'est-a-dire tant que 
I'indicateur Z (voir Premiere Partie, section 5) n'est pas mis, signalant 
que l'ope>ation qui vient d'avoir lieu (le OU logique) avait pour r^sultat 
0. 

Pour returner, le saut aura lieu tant que HL ne sera pas vide (saut de 
-5, done en ligne 6; voir a ce sujet I'Annexe I qui explique tout sur les 
sauts relatifs). Si HL est vide, le saut sera ignore" et le programme se 
poursuivra en ligne 10. 

La boucle est done boucl6e : en ligne 6, HL est a nouveau d6cr<§mente, 
puis A est charg6 avec H, le OU logique effectud, et ainsi de suite, 
jusqu'a ce que HL ait ete" d6cr<§ment<§ 65110 fois. L'ensemble est done 
execute" en une demi-seconde, ce qui prouve bien la rapidity du langage. 

II reste maintenant a etudier la boucle g6n6rale. 

Nous avons dit que, lors de I'appel du sous-programme, le parametre 
X 6tait sens6 exprimer un temps en secondes. Or, notre boucle centrale 
ne fait qu'une demi-seconde. La premiere chose qu'il y a done a faire, 
est de multiplier le parametre X par 2 : 

Ligne 1 

Si vous avez bien lu la section "Les parametres transmissibles", cette 
ligne ne devrait pas poser de probleme : chargement du registre H avec 
le contenu de I'emplacement memoire d'adresse IX+1, e'est-a-dire avec 
I'octet fort de X. 
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Ligne 2 

Chargement du registre L avec le contenu de ('emplacement memoire 
d'adresse IX + 0, c'est-a-dire avec I'octet faible de X. Apres ces deux 
lignes, HL est done charge avec X. 

Ligne 3 

Addition de HL... avec lui-meme ! Le rSsultat <§tant charge" dans HL, 
cela revient done a multiplier par 2 son contenu. II est maintenant 
charge avec 2 * X. 

Ligne 4 

Empilement du registre HL : le contenu du registre HL est depos6 sur 
la fameuse pile evoquee dans la Premiere Partie. Le registre HL va en 
effet gtre utilise pour autre chose, mais nous aurons encore besoin de 
son contenu, que nous stockons done en le d^posant sur la pile. 

Remarque importante 

Lorsque Ton empile un registre, celui-ci ne se vide pas, contrairement 
a ce que Ton pourrait croire. Apres cette ligne 4, par exemple, HL 
contient toujours X * 2. L'empilement provoque en quelque sorte un 
recopiage de la valeur sur la pile. 

Apres cette ligne, le programme arrive a la ligne 4, ou commence la 
boucle centrale d6ja (Studied. Cette boucle est ex<§cut6e, apres quoi le 
programme passe a la ligne 10. 

Ligne 10 

Defilement du registre HL : la donnee sauvegard^e en ligne 4 est 
retiree de la pile et charged dans le registre HL, qui contient done 
maintenant a nouveau X * 2. 

Lignes 11, 12, 13 

Elles suivent exactement le m§me processus que les lignes 6, 7 et 8 
deja 6tudi6es : decrementation de HL, chargement de A avec H, OU 
logique entre A et L. Comme vous I'avez sans doute deja compris, il 
s'agit la de notre boucle generate, ou tout au moins de sa partie 
compteur. 

Ligne 14 

Saut relatif de -15 (en ligne 4) si non nul : ni HL n'est pas encore 
f§gal a 0, le programme saute en ligne 4 ou le contenu actuel de HL est 
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de nouveau "mis au frais". Ensuite, nouveau depart de la boucle 
centrale pour une demi-seconde. 

L'ensemble du processus se renouvellera (X * 2) fois, et comme la 
boucle centrale dure une demi-seconde, le temps total sera bien de 
X secondes. Lorsque le compteur de la boucle g£ne>ale atteint 0, le 
saut n'est pas effectue" et le programme passe a la ligne 15. 

Ligne 15 

Cette instruction signale la fin du programme en langage machine et 
provoque le retour au BASIC. 

Le programme doit §tre implante" selon les principes exposes dans la 
Deuxieme Partie et peut etre ensuite appele a partir du BASIC : 

100 CALL 43880,10 

Cette ligne BASIC provoquera une pause de dix secondes. 

Signalons qu'il est facile de modifier le programme pour que le 
parametre X determine un temps exprime' en fractions de seconde. II 
suffit pour cela de jouer sur la valeur que I'on charge dans HL a la 
ligne 5 (avec une valeur de 6290, par exemple, un CALL 43880,1 
provoquera une pause de 1/10 de seconde). 

En proc6dant par tatonnements, on peut ainsi trouver n'importe 
quelle unite de pause. II faut bien sur pour cela utiliser I'instruction 
BASIC TIME : 

100 TE = TIME/300 : CALL 43880,1 : TE1 = TIME/300 : 
PRINT TE1-TE 

Le temps de pause s'aff ichera en secondes. 
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2. INTEGRATION 

D'UN PROGRAMME MACHINE 



Pour simplifier la manipulation des programmes en langage machine, 
et pour rendre leur emploi moins dangereux (on a vite fait de taper 
43800 au lieu de 43880, par exemple), il est possible d'effectuer ce que 
I'on appelle une integration. Cela permet de donner a ces programmes 
des noms, grace auxquels il sera possible de les appeler en BASIC, 
comme s'il s'agissait veritablement de nouvelles instructions. 

Pour illustrer la methode d'integration, nous allons nous servir du 
programme precedent et nous arranger pour qu'il soit possible de 
I'appeler avec le format suivant : 

I PAUSE.X 

Notons que I'extension d'instruction est signalee par un trait vertical 
(SHIFT + @) place devant le mot. 

Aucune autre integration ne sera effectuee pour les programmes 
suivants, mais vous pourrez tres facilement les faire vous-meme en 
vous servant de ce modele. 

Voici le listing du programme d'integration : 

LIGNE ADRESSE DU 1ER CODE 
DE CETTE LIGNE 

DEC. HEXA. 



1 


43856 


2 


43859 


3 


43862 


4 


43865 


5 


43867 


6 


43870 


7 


43874 


8 


43875 



CODE-MACHINE 


MNEMONIQUE 






1,59,AB 

21,64,AB 

C3.D1.BC 


LD BC, 43865 
LD HL, 43876 
JP 48337 



43876 



10 A3880 



5E.AB 43870 

•C3,68,AB JP 43880 



50,41,55,53 

C5 





0,0,0,0 



■DD,66,1 " LD h, (T>U 



Le programme peut §tre divisie en quatre parties : 

• Lignes 1, 2 et 3 : Integration proprement dite. 

• Lignes 4 a 8 : Table d'instruction 

(nous verrons de quoi il s'agit plus loin). 

• Ligne 9 : Espace reserve pour la machine. 

• Lignes 10 et suivantes : Programme pause identique au precedent. 
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Nous allons etudier tout cela dans le desordre pour que, paradoxale- 
ment, cela soit plus clair. 

Ligne 6 

II s'agit de la representation hexadecimale des codes ASCII (a ce 
sujet, voir page A3.1 du guide de I'utilisateur) des lettres du mot choisi 
pour I'instruction, sauf la derniere (en I'occurrence, il s'agit done des 
codes de P, de A, de U, et de S). 

Ligne 7 

Representation hexadecimale du code ASCII de la derniere lettre du 
mot d'instruction plus &80 (en I'occurrence, il s'agit done du code 
ASCII de E, plus &80, ou plus 128 en decimal). 

Ligne 8 

Le signifie a la machine que le mot est termini. 

Ligne 9 



Ces quatre octets sont reserves pour la machine (et plus exactement 
pour un systeme appele Kernel) ils lui serviront a gerer I'extension. La 
maniere dont elle s'y prendra nous importe peu. 

Ligne 4 

II ne s'agit pas la d'une instruction, mais tout simplement de I'adresse 
en memoire du code ASCII de la premiere lettre du mot d'instruction 
(ici &50, code ASCII de P, a I'adresse 43870). 

Ligne 5 

L'instruction C3 est une instruction de saut que I'on peut comparer 
au GOTO BASIC. Cette instruction doit etre suivie d'une adresse en 
memoire (ici 43880 ou &AB68). 

Remarque importante 

D'une maniere generale, lorsque I'on ecrit une adresse ou une donn6e 
quelconque dans un programme en langage machine, I'octet faible est 
tou jours 4crit avant I'octet fort. 

Pour en revenir a notre ligne 5, il s'agit done d'un saut a I'adresse 
43880, a laquelle debute le programme de pause proprement dit, tel 
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que nous I'avons d6ja 6tudie\ Cette ligne constitue le debut de la table 
d'instruction. 

Voyons maintenant ('integration : 

Ligne 1 

Chargement, dans BC, de I'adresse du dibut de la table d'instruction 
(done de I'adresse du premier code de la ligne 5). 

Ligne 2 

Chargement, dans HL, de I'adresse du premier des quatre octets 
reserves. 

Ligne 3 

Saut a I'adresse 48337. A cette adresse, qui fait partie du systeme 
interne de la machine, se trouve un programme que I'on pourrait 
appeler"Int6grer une instruction". La encore, nous laisserons I'ordinateur 
faire son travail, sans nous pr6occuper de la maniere dont cela se 
passe. 

En r6alite\ on ne peut comprendre parfaitement ce programme a 
moins de connaTtre a fond le programme interne d'int6gration. 

Quant a nous, il nous suffit de savoir que ca marche... 

Une fois le programme charg6 en m§moire, /'/ doit §tre initialise une 
fois et une seule en faisant CALL 43856. 

On peut ensuite utiliser le programme de pause grace a I PAUSE,X. 
En cas d'6criture erron^e de I'instruction, I'gditeur sortira en principe 
un syntax error. 

Remarque 

Contrairement au programme precedent, celui-ci n'est pas directement 
relogeable. II comprend en effet ce que I'on appelle des adresses 
internes ; la premiere ligne, par exemple, charge BC avec I'adresse 
&AB59 (43865), qui est une adresse du programme lui-meme. Si vous 
souhaitez d^placer ce programme et le mettre ailleurs en m<§moire, ce 
qui est toujours possible, il ne faut surtout pas oublier que cette adresse 
va 6galement changer en fonction de la nouvelle place du programme, 
et qu'il faut done modifier la ligne 1, ainsi que toutes les lignes 
comprenant des adresses internes. 

Pour faciliter les deplacements de programme que vous pourriez 
entreprendre, les adresses a modifier seront toujours soulign^es dans 
les listings. 
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3. DESSIN D'UN QUADRILATERE 






■ 















Le programme que nous allons etudier maintenant est un peu plus 
ambitieux : il permettra en effet la realisation de quadrilateres de tailles, 
couleurs et localisation differentes. 

II debute a I'adresse 43790, finit en 43902 (chiffre de verification: 
14746), n'est pas directement relogeable et son appel aura le format 
suivant : 



CALL 43790,XC,YC,L,H,C,PV 

XC et YC sont les coordonn^es du coin sup6rieur gauche du quadrilatere, 
L determine sa largeur, H sa hauteur, C sa couleur et PV indique s'il 
doit §tre plein ou vide (1 : plein, : vide). 

Pour qu'il n'y ait plus de doute quant a la situation de ces parametres 
au moment de I'appel du programme, rappelons une derniere fois le 
pointage du registre IX : 



Octet faible 
de PV 



Octet fort d 
de PV 



Octet faible 
deC 



Octet fort 
deC 



Octet faible 
deH 



Case memoire d'adresse IX + 






Case memoire d'adresse IX + 1 



Case memoire d'adresse IX + 2 



Case memoire d'adresse IX + 3 



Case memoire d'adresse IX+4 
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Octet fort 
de H 



Octet faible 
de L 



Octet fort 
del- 



Octet faible 
deYC 



Octet fort 
deYC 



Octet faible 
deXC 



Octet fort 
deXC 



Case memoire d'adresse IX + 5 
Case memoire deadresse IX + 6 
Case memoire d'adresse IX + 7 
Case memoire d'adresse IX + 8 
Case memoire d'adresse IX 4- 9 
Case memoire d'adresse IX + 10 
Case memoire d'adresse IX + 11 



Attention, la lecture de I'Annexe II sur les coordonnees est un 
prealable indispensable a I'etude de ce programme, dont voici le listing : 
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LIGNE 


ADRESSE DU ler CODE CODE-MACHINE 
DE CETTE LIGNE 

DEC. HEXA. 


MNEMONIQUE 


1 


43790 DD.7E.2 


LD A,(IX+2) 


2 


43793 




CD.DE.BB 


CALL 48094 


3 


43796 


DO, 66, 9 


LD H,(IX+9) 


4 


43799 D0,6E,8 


LD L,(IX+8) 


5 


43802 D0,56,B 


LD D,(IX+11, 


6 


43805 DD.5E.A 


LO E,(IX+10, 


7 


43808 


1 > 05 


PUSH DE 


8 


43809 


E5 


PUSH HL 


9 


43810 


CD.CO.BB 


CALL 48064 


10 


43813 
43816 


00,66,5 


LO H,(IX+5) 


11 


DD,6E,4 


LD L,(IX+4) 


12 


43819 


E5 


PUSH HL 


13 


43820 


CD,C7,B0 


CALL 48583 


14 


43823 


11,0,0 


LD DE,0 


15 


43826 


CD,F9,B8 


CALL 48121 


16 


43829 


3E,1 


LD A,l 


17 


43831 


DD,BE,0 


CP (IX+O) 


18 


43834 






JR NZ 31 




^u,ir 


19 


43836 






DD,66,7 


LD H,(IX+7) 


20 


43839 




DD,6E,6 


LD L,(IX+6) 


21 


43842 




11,2,0 


LE DE,2 


22 


43845 




ED, 52 


SBC HL.DE 


23 


43847 




■ — F2.4E.AB 


JP P, 43854 


24 


43850 






CI 


POP BC 


25 


53851 






CI 


POP BC 


26 


43852 






CI 


POP BC 


27 


43853 






C9 


RET 


28 


43854 AB4E 






— > DD.74,7 


LO (IX+7),H 


29 


43857 




DD,75i6 


LD (IX+6),L 


30 


43860 




CI 


POP BC 


31 


43861 




El 


POP HL 


32 


43862 




Dl 


POP DE 


33 


43863 




13 


DEC DE 


34 


43864 




13 


DEC DE 


35 


43865 




18.05 


JR -59 


36 


43867 




?* nn ce ^ 


LD D, (IX+7) 
LD E,(IX+6) 


37 


43870 D0,5E,6 


38 


43873 El 


POP HL 


39 


43874 05 


PUSH DE 


40 


43875 E5 


PUSH HL 


41 


43876 21,0,0 


LD HL,0 


42 


43879 CD,F9,BB 


CALL 48121 


43 


43882 El 


POP HL 


44 


43883 11,0,0 


LD DE.O 


45 


43886 CD,F9,BB 


CALL 48121 


46 


43889 El 


POP HL 


47 


43890 CD,C7,BD 


CALL 48583 


48 


43893 11,0,0 


LD DE,0 


49 


43896 EB 


EX DE.HL 


50 


43897 CD,F9,BB 


CALL 48121 


51 


43901 CI 


POP BC 


52 


43901 CI 


POP BC 


53 


43902 C9 


RET 
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Comme vous le voyez sur le listing, le programme peut §tre divise 
en quatre blocs : 

• Le premier n'est compost que de deux lignes et fixe la couleur. 

• Le deuxieme va des lignes 3 a 18. II dessine la premiere ligne du 
quadrilatere puis effectue le branchement a telle ou telle partie du 
programme selon que le quadrilatere doit etre plein ou vide. 

• Le troisieme va des lignes 19 a 35 et dessine un quadrilatere plein. 

• Le quatrieme, enfin, dessine un quadrilatere vide. 

Ligne 1 

Chargement de A avec I'octet faible du parametre C (le numero de 
couleur etant forcement compris entre et 15, I'octet fort de sa 
representation hexadecimale sera toujours egal a 0, et nous ne nous en 
preoccuperons pas. C'est d'ailleurs pour cela que nous pouvons utiliser 
un registre simple). 

Ligne 2 

Appel de la routine du systeme d'exploitation d'adresse &BBDE. Cette 
routine fixe la couleur d'ecriture graphique (avant I'appel de cette 
routine, A doit §tre charg6 avec le numero de couleur souhait6e, ce 
qui a bien ete fait a la ligne precedente). 

Notons que I'instruction &CD est tout a fait comparable a I'instruction 
BASIC GOSUB : il s'agit bien de I'appel d'un sous-programme. Une fois 
ce sous-programme termine, le retour sera effectue, en I'occurrence a 
la ligne 3. 

Lignes 3 et 4 

Chargement de HL avec I'ordonnee (YC) du coin superieur gauche du 
quadrilatere desire. 

Lignes 5 et 6 

Chargement de DE avec I'abscisse (XC) du m§me point. 

Ligne 7 

Empilement de DE. Nous aurons en effet a nous resservir de cette 
valeur XC, et il est plus facile de charger un registre a partir de la pile 
(1 octet suff it), qu'a partir de IX (6 octets sont n^cessaires). 
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Ligne 8 

Empilement de HL pour la m§me raison. (La pile va §tre souvent 
soil ici tee, et il est vivement conseille de noter au fur et a mesure les 
depilements et empilements). 

Ligne 9 

Appel de la routine d'adresse &BBC0, qui fixe le curseur graphique a 
une position absolue dont les coordonnees doivent §tre, avant I'appel, 
dans DE pour I'abscisse et dans HL pour I'ordonnee. Le curseur est 
done maintenant fixe sur le coin superieur gauche de notre futur 
quadrilatere. 

Avant de passer aux lignes suivantes, un dessin nous permettra d'avoir 
une vue plus claire du processus : 



(XC.YC) 


















^ 















IX1.Y1) 



Nous avons, en ligne 9, fixe le curseur sur (XC,YC), et nous voulons 
maintenant tracer la ligne allant de (XC.YC) a (X1,Y1). Relativement au 
point (XC.YC), X1 =0 et Y1 = -H. 

Nous allons done commencer par charger ces valeurs dans DE et HL. 

Lignes 10 et 11 

Chargement de HL avec le parametre H. 

Ligne 12 

Sauvegarde de cette valeur par empilement. 
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Ligne 13 

Appel de la routine d'adresse &BDC7, qui a pour fonction d'inverser 
le signe du contenu de HL. Ce dernier est done maintenant charge avec 
-H. 



Ligne 14 

Chargement du registre DE avec (n'oublions pas que, pour charger 
un registre double, il faut obligatoirement indiquer les deux octets de 
la valeur, le fort et le faible, m§me s'ils sont egaux a 0). 

Ligne 15 

Appel de la routine d'adresse &BBF9, qui trace une ligne a partir de 
la position actuelle du curseur jusqu'a une position relative determinee 
par DE (abscisse) et HL (ordonnde). 

Voila done notre premiere ligne tracee (de plus, le curseur se trouve 
maintenant en X1,Y1). 

II est temps maintenant de tester le parametre PV pour determiner si 
le quadrilatere doit §tre plein ou vide. 

Ligne 16 

Chargement de A avec 1 (nous verrons pourquoi plus loin). 

Ligne 17 

Comparaison de A et du contenu de I'emplacement d'adresse IX + 0. 
La comparaison se passe de la maniere suivante : le contenu de 
I'emplacement memoire d'adresse IX + est soustrait de A, et le r^sultat 
n'est pas conserve (ce qui revient a dire que A n'est pas modified C'est 
en quelque sorte une soustraction "de tete"). Neanmoins, les indicateurs 
Z et S sont modifies en fonction : en particulier, Z est mis a 1 si la 
comparaison indique I'egalit6 (en I'occurrence, si (IX + 0)=A, ce dernier 
ayant ete charge avec 1). 

Pour resumer, I'indicateur de sera mis si le parametre PV = 1. 

Ligne 18 

Saut relatif de 31 (en ligne 36), si I'indicateur de n'est pas mis, 
done s'il s'agit de dessiner un carre vide. Dans le cas contraire, le saut 
n'est pas fait et le programme continue en ligne 19, ou commence 
I'execution du quadrilatere plein. 

La figure ci-apres montre le principe adopte : 
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XC XC+2 XC+4 
YC YC YC 










-H -H -H 






M 












■ 



II s'agit de dessiner une serie de lignes les unes contre les autres, de 
maniere a obtenir un quadrilatere plein. Chacune d'entre elles sera 
tracee exactement de la m§me maniere que la premiere, a la seule 
difference que les abscisses de I'extremite supe>ieure seront, pour 
chaque nouvelle ligne, d^calees vers la droite. Comme vous le voyez, 
nous avons indiqu6 ces abscisses sous la forme : XC + 2, XC + 4, etc., ce 
qui signifie que ce decalage se fera de deux en deux. En voici la raison : 
de par le fonctionnement de I'gcran graphique du CPC, une ligne 
verticale a obligatoirement une largeur de 1 pixel en mode 2, de 2 
pixels en mode 1, et de 4 pixels en mode 0. Puisque nous avons choisi 
de travailler en mode 1, chaque decalage vers la droite pourra §tre de 
2 pixels (nous pourrions faire des decalages de 1, mais le temps 
d'exScution serait alors double inutilement car nous 6cririons sur des 
lignes d6ja tracees). 

Pour en revenir a la figure, les coordonnees du point bas de chaque 
ligne sont bien sur relatives au point haut de la mime ligne. Puisque 
nous allons tracer toutes ces lignes en suivant le m§me processus, il va 
nous falloir une boucle. Or, qui dit boucle dit compteur. 

C'est le parametre L (largeur) qui va nous en tenir lieu : nous voulons 
un quadrilatere de largeur L (L <§tant exprime en pixels) ; or, chaque 
fois que nous tracons une ligne, elle fait 2 pixels de large. Chaque fois, 
done, nous enleverons 2 a la largeur, jusqu'a ce que le resultat soit 
n£gatif (on ne peut pas dire : "jusqu'a ce que le resultat soit nul" car, 
si L est impair, le compteur passerait de 1 a -1 et ne serait done 
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jamais nul : cas typique d'une boucle sans fin qui peut obliger a eteindre 
la machine). 

Le compteur est constitu^ par les lignes 19 a 23 : 

Lignes 19 et 20: 

HL est charge avec le parametre L. 

Ligne 21 

Chargement de DE avec 2. 

Ligne 22 

DE est soustrait de HL (le re^ultat est range dans HL). 
Ligne 23 

Saut conditionnel a I'adresse 43854 (&AB4E, ligne 28) si le resultat 
est positif, c'est-a-dire si la boucle doit continuer. 

Nous allons laisser de c6te les lignes 24 a 37 pour le moment, et 
nous interesser d'abord au cas ou la boucle n'est pas terminee : 

Lignes 28 et 29 

Le contenu de H est charge dans I'emplacement memoire d'adresse 
IX + 7 et celui de L dans I'emplacement memoire d'adresse IX+6. Le 
resultat est done qu'a chaque tour de boucle la nouvelle valeur de L 
(qui, ne I'oublions pas, vient d'etre d6cremenr.ee de 2 a la ligne 22) est 
rangee a la place de I'ancienne. A chaque tour egalement, elle sera 
reprise en lignes 18 et 19, puis diminuee de 2, puis rangee, et ainsi de 
suite jusqu'a ce qu'elle devienne negative. 

Ligne 30 

Si vous avez bien suivi la pile, vous savez que, jusqu'a present, il y 
avait le parametre H sur son sommet. Nous n'aurons plus besoin de 
cette donnee, et nous la faisons disparaftre de la pile en depilant BC. 

Ligne 31 

Sur le sommet de la pile se trouve maintenant I'ordonnee YC. Elle 
est chargee dans HL. 

Ligne 32 

Chargement de I'abscisse XC (a partir de maintenant, nous considere- 
rons que vous connaissez, a chaque instant, I'etat de la pile). 
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Lignes 33 et 34 

Comme nous I'avons explique precedement, I'abscisse du point de 
depart de la ligne suivante doit etre decalee de 2 vers la droite par 
rapport a celle qui vient d'etre tracee. C'est pourquoi nous incrementons 
(=ajoutons 1) deux fois DE. 

HL est done maintenant charge avec YC, et DE avec XC + 2 (tout au 
moins au deuxieme tour de boucle. Au troisieme tour ce sera XC + 4, 
au quatrieme tour XC + 6, etc.). 

Ligne 35 

Saut relatif de -59, e'est-a-dire en ligne 7. La, les valeurs contenues 
actuellement dans DE et HL sont sauvegardees, puis le curseur est fixe, 
la ligne tracee, et ainsi de suite. 

Lorsque la boucle est terminee, le saut de la ligne 23 ne se fait pas, 
et le programme passe a la ligne 24. 



Lignes 24, 25 et 26 

Si le programme arrive a la ligne 24, c'est done que le dessin du 
quadrilatere est termine, et qu'il faut revenir au BASIC. Mais auparavant, 
II faut remettre la pile en etat (revoir a ce sujet la Deuxieme partie). 

Nous avions empile trois valeurs sur la pile, elles y sont encore pour 
I'instant. La pile est done "nettoyee" par trois depilements successifs 
de BC (nous aurions pu depiler n'importe quel registre, mais dans ces 
cas-la, et pour des raisons qu'il serait trop long de developper, il faut 
mieux utiliser BC). 

L'etude du bloc "Quadrilatere plein" etant termine, passons au bloc 
"Quadrilatere vide". 

Le processus de tragage sera le suivant : 

4 



XC.YC » 






X1.Y1 • 






X3.Y3 









3 
42- 



« X2.Y2 






Les lignes 2, 3 et 4 seront tracees les unes apres les autres et dans 
cet ordre. II faut remarquer que : 

• Les coordonnees du point (X2,Y2) relativement a (X1.Y1) sont (L,0). 

• Les coordonnees du point (X3.Y3) relativement a (X2.Y2) sont (O.H). 

• Les coordonnees du point (XC,YC) relativement a (X3,Y3) sont (-L,0). 
(N'oublions pas que XC et YC sont des cordonnees absolues.) 

II est peut-etre utile de rappeler la situation au moment ou s'effectue 
le branchement de la ligne 18 ; 

La ligne 1 est tracee, le curseur est positionne en (X1,Y1) et il y a 
trois valeurs stockees sur la pile (H se trouve au sommet, YC juste en 
dessous et XC encore en dessous). 

Lignes 36 et 37 

Chargement de DE avec le parametre L. 

Lignes 38, 39 et 40 

II s'agit ici de sauvegarder le parametre charge dans DE, mais, pour 
des raisons pratiques qui s'expliqueront d'elles-memes plus loin, il faut 
que cette valeur ne soit pas sur le sommet de la pile, mais a Vavant- 
dernier etage. C'est pourquoi la ligne 38 "souleve" H, apres quoi DE 
est empile, puis H "repose". 

Ligne 41 

Chargement de HL avec 0. 

Ligne 42 

Appel de la routine d'adresse &BBF9. La ligne 2 est maintenant tracee 
(par la meme occasion, le curseur est en (X2,Y2)). 

Lignes 43, 44 et 45 

Chargement de HL avec H, de DE avec 0, et trace de la ligne 3. 

Lignes 46 et 47 

Chargement de L dans HL, puis appel de la routine &BDC7 (deja 
etudiee en ligne 13). HL est done maintenant charge avec -L. 

-43- 



Ligne 48 










dans DE. 











Ligne 49 






Une nouvelle instruction : les contenus de HL et DE sont echanges. 
Pour tracer la ligne 4, c'est en effet DE qui doit etre charge avec — L 
et HL avec 0. 

Ligne 50 

Trace de la ligne 4. 

Lignes 51 et 52 

Remise en etat de la pile. 

Ligne 53 

Retour au BASIC. 

L'utilisation de ce programme ne pose en principe aucun probleme, 
meme si vous fournissez des parametres errones ou si vous en oubliez. 
Dans le pire des cas, rien ne se passera. 

Voici un programme de demonstration : 

100 MODE0 

110 FOR 1 = 1 TO 100 : GOSUB 180 

120 CALL 43790,A,B,C,D,E,0 

130 NEXT I 

140 FOR 1 = 1 TO 100 : GOSUB 180 

150 CALL43790,A,B,C,D,E,1 

160 NEXT I 

170 END 

180 A = INT(RND * 640) : B = INT(RND * 400) : C = INT(RND 

* 300): D = INT(RND * 300): E = INT(RND * 16): 

RETURN 

Essayez aussi en intercalant la ligne : 

135 POKE 43863,&2B 

Un bon exercice serait de chercher a comprendre la raison de 
I'etrange resultat provoque par cette ligne... 

- 44 - 



4. DEFILEMENT D'UNE LIGNE 



Ce programme permettra d'effectuer des defilements (ou scrollings) 
de ligne vers la droite ou vers la gauche. 

II debute a I'adresse 43830, finit en 43902 (chiffre de verification : 7424), 
est relogeable tel quel, et son format d'appel est le suivant : 

CALL 43830, NL, S 

NL est le numero de la ligne concernee et S determine le sens de 
defilement (0 provoquera un defilement vers la gauche et 1 un 
defilement vers la droite). 

Attention, il est absolument necessaire de lire I'Annexe III, concernant 
la memoire ecran, avant d'aborder I'etude de ce programme. 

Pour ce programme, nous allons commencer par une description 
globale de la demarche adoptee. Nous nous aiderons pour cela de la 
figure ci-apres, qui represents une partie de la carte memoire de la 
ligne n°1 (cette ligne n'est bien sur prise que comme exemple et le 
raisonnement reste le meme quelle que soit la ligne choisie). 



DE 


DE 


DE 


HL HL — 


HL— 
DE 


HL— 
DE 


DE 


ler 

2feme 

3eme 

4eme 

5emG 

6eme 

7erae 

8eme 




49152 


49153 


49154 




49229 


49230 


49231 


trait 


512u'J 


51201 








51278 


51279 


trait 


5 32 A3 


53249 









53326 


53327 


trait 


55296 










55375 


trait 


57344 












57423 


trait 


59392 













594 71 


trait 


61440 










61519 


trait 


63448 










63567 


trait 



Ne vous preoccupez pas, pour I'instant, des registres represented. 

Le moyen le plus simple de faire defiler cette ligne, par exemple vers 
la gauche, serait le suivant : 

Transferer le contenu de I'emplacement memoire 49153 dans I'empla- 
cement memoire 49152 (on peut dire transferer (49153) dans 49152), 
puis transferer (49154) dans 49153, puis (49155) dans 49154, et ainsi de 
suite jusqu'a la fin du premier trait qui se retrouve ainsi decale d'un 
octet vers la gauche. II suffit ensuite de renouveler I'operation avec les 
septautres traits pour que la ligne entiere se retrouve a son tour 
decalee d'une position vers la gauche. 
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Remarques 

1. II va nous falloir deux compteurs de boucle . un compteur que nous 
appellerons compteur d'octets et qui nous servira pour decaler les 
80 octets d'un meme trait, et un autre que nous appellerons compteur 
general, et qui comptera le nombre de traits qui ont ete decales, de 
maniere que le programme s'arrete lorsque les huit traits le sont. 

2. En ce qui concerne les octets des extremites gauches de chaque 
trait (49152, 51200, 53248, etc.), nous avons dit que nous commence- 
rions par transferer (49153) dans 49152. Mais il faut savoir qu'alors 
le contenu initial de 49152 sera perdu, puisque remplace. 

Or nous devons conserver ce contenu pour pouvoir le transferer 
quand le trait aura ete entierement decale, en 49231. 

II faudra done veiller a la sauvegarde du contenu des huit octets de 
gauche. 

Le defilement vers la droite s'obtiendra evidemment selon le meme 
principe, mais inverse: (49230) dans 49231, (49229) dans 49230, etc. 
Cette fois, ce sont les contenus des octets des extremites droites de 
chaque trait qui devront etre sauvegardes. 

Pratiquement, les decalages seront obtenus grace a deux instructions 
qui constitueront veritablement le cceur du programme. 



Transfert repetitif de bloc avec decrementation 



Cette instruction sera utilisee pour les defilements vers la droite. 
Voici sa description, qu'il convient de lire calmement, plusieurs fois, et 
en s'aidant de la figure ci-apres. 

Le contenu de ('emplacement memoire dont I'adresse est dans HL 
est charge dans I'emplacement memoire dont I'adresse est dans DE. 
Puis HL, DE et BC sont tous trois decremented (on leur enleve 1). Si BC 
est different de 0, I'instruction est executee de nouveau. Sinon, le 
programme continue normalement. 

La description est un peu rebarbative, mais en fait le fonctionnement 
de cette instruction est tres simple. Regardez la figure suivante. 

Imaginons qu'au depart HL soit charge avec 49230, DE avec 49231, 
et BC avec 79. Lorsque I'instruction est executee, le contenu de 49230 
est charge dans 49231. Les trois registres sont decrement.es. HL est 
maintenant charge avec 49229 (on dit aussi pointe sur 49229) et DE est 
points sur 49230. Quant a BC, qui contient maintenant 78, il est 
different de 0. L'instruction est done executed de nouveau, et ainsi de 
suite. 
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Ainsi, HL et DE vont se deplacer ensemble tout au long du trait, 
jusqu'au moment ou BC sera egal a 0, auquel cas le transfert sera 
termine (le compteur d'octets eVoque plus haut sera done constitue 
par BC et initialise avec 79). 

En prenant le cas du premier trait, par exemple, signalons qu'a la fin 
de ['instruction HL sera "sorti" de I'ecran, puisqu'il se retrouvera pointe 
sur 49151 alors que DE le sera sur 49152 (vous comprenez sans doute 
maintenant pourquoi BC est charge avec 79 au lieu de 80 : ce dernier 
transfert ne nous interesse pas). 

Pour information, il faut egalement signaler que I'emplacement 
source, e'est-a-dire celui dont le contenu est transfere, n'est pas affecte 
par le transfert en question (il serait en fait plus juste de parler de 
recopiage plutot que de transfert). 

L'instruction suivante permettra le defilement vers la gauche. 



Transfert repetitif de bloc avec incrementation 



Le contenu de I'emplacement memoire dont I'adresse est dans HL 
est charge dans I'emplacement memoire dont I'adresse est dans DE. 
Les registres HL et DE sont ensuite incrementes (on leur ajoute 1), 
tandis que BC est decrements. Tant que BC n'est pas egal a 0, 
l'instruction est executee une nouvelle fois. 

Pour transferer le premier trait, par exemple, HL et DE devront done 
§tre respectivement pointes sur 49153 et 49152. 






Une derniere chose enfin : puisque nous appellerons le programme 
en ne fournissant que le numero de ligne, il devra se charger de calculer 
les adresses avec lesquelles HL devra etre initialise (le deuxieme octet 
du premier trait de cette ligne pour un defilement vers la gauche, et 
I'avant-dernier octet de ce meme trait pour un defilement vers la droite). 
Le deuxieme octet peut etre calcule grace a la formule suivante : 

49150 + (80 * NL) 

ou NL est le numero de ligne. L'avant dernier octet, lui, est donne par : 

49073 + (80 * NL) 

Vous pouvez verifier, si vous en avez envie, que ces formules sont 
valables quel que soit le numero de ligne. 

Si tout cela est bien compris, nous pouvons maintenant en venir au 
programme, dont voici le listing : 
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LIGNE ADRESSE OU ler CODE 
DE CETTE LIGNE 

DEC. HEXA. 

1 43830 

2 43833 

3 43835 

4 43836 

5 43839 

6 43842 

7 43845 

8 43848 

9 43850 

10 43853 

11 43855 

12 43858 

13 43859 

14 43860 

15 43861 

16 43862 

17 43865 

18 43866 


CODE-MACHINE MNEMONIQUE 

CD,19,BD CALL 48409 
6,8 LD B,8 
C5 PUSH BC 
21,50,0 LD HL,80 
DD,56,3 LD D,(lX+3) 
DD,5E,2 LD E,(IX+2) 
CD.BE.BD CALL 48574 
3E,1 LD A,l 
DD,BE,0 CP (1X+0) 

On 1 Q ID M7 O/i 






£^ , i.U *J>* 1*1. , £.-* 




ll.FE.BF LD,DE, 49150 

. ^ i -, ann hi np 






E5 PUSH HL 
Dl POP DE 
13 INC DE 
1,4F,0 LD BC,79 
1A LD A,(DE) 
ED,B8 LDDR 




19 43868 

20 43869 

21 43870 

22 43872 

23 43873 

24 43874 

25 43877 

26 43879 

27 43882 

28 43883 

29 43884 

30 43885 

31 43886 

32 43889 

33 43890 

34 43892 

35 43893 

36 43894 

37 43896 

38 43897 

39 43898 

40 43901 




12 LD (DE),A 

CI POP BC 
1 10,1 DJNZ.l 

C9 RET 
•— » C5 PUSH BC 

li^rfl innr7i?7 






18, EB JR -21 






=► 19 ADD HL.DE 

E5 PUSH HL 
Dl POP DE 
IB DEC DE 
1,4F,0 LD BC.79 
1A LD A,(DE) 
ED, BO LDIR 
12 LO (DE),A 
CI POP BC 

| 10,1 DJNZ.l 

C9 RET 
■— >C5 PUSH BC 

11,B1,7 LD DE.1969 

18, EB JR, -21 





Ligne 1 






Appel de la routine d'adresse &BD19. Cette routine s'appelle "Attendre 
le retour du rayon" ; elle permet de synchroniser un programme 
d'animation d'ecran avec le balayage de I'ecran par le rayon, ce qui 
evite des effets optiques desagreables. Cette routine est souvent 
indispensable pour les animations, mais il faut savoir qu'elle ralentit 
considerablement I'execution des programmes (lorsque vous aurez entre 
le programme, essayez par exemple de remplacer les trois codes de la 
premiere ligne par trois zeros). 
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Lignes 2 et 3 

Chargement de 8 dans B, puis sauvegarde par empilement. II s'agit 
bien sur de la valeur initiale du compteur general (notons que malgre 
le "PUSH BC", la valeur contenue dans C nous importe peu). 

II faut maintenant aborder le calcul de I'octet de depart, en fonction 
de la ligne. Si vous regardez les deux formules proposees dans le 
preambule, vous pouvez constater que, quel que soit le sens de 
defilement choisi, elles comportent une partie commune : 80 * NL. 
Nous allons done commencer par cela : 






Ligne 4 

HL est charge avec 80. 






Lignes 5 et 6 

Chargement du parametre NL (numero de ligne) dans DE. 

Ligne 7 

Appel de la routine d'adresse &BDDE, qui multiplie HL par DE et 
range le resulat dans HL. Ce dernier est done maintenant charge avec 
80 * NL. 

II est temps maintenant de determiner le sens de defilement. 

Ligne 8 

A est charge avec 1. 

Lignes 9 et 10 

Comparaison du parametre S avec 1, puis saut relatif de 24 (en 
ligne 26) si non nul. Le branchement conditionnel est realise ici selon 
un processus deja etudie dans le programme de dessin d'un quadrilatere 
(lignes 17 et 18). Seule la longueur du saut est differente. Pour resumer : 
si le defilement doit etre vers la gauche, le saut se realise. S'il doit etre 
vers la droite, le programme continue en sequence. Voyons ce dernier 
cas : 

Ligne 11 

II nous faut d'abord calculer I'adresse de I'avant-dernier octet 
du premier trait de la ligne concernee, grace a la formule : 49150 + (80 
* NL). 

-49- 



Rappelons que HL est toujours charge avec 80 * NL. La ligne 11 
charge maintenant DE avec 49150. 

Ligne 12 

HL est additionne a DE, et le resultat se retrouve dans HL, qui est 
maintenant pointe correctement pour le transfert du premier trait. Nous 
allons maintenant pointer DE. 

Lignes 13 et 14 

L'empilement de HL, suivi immediatement du depilement de DE, a 
pour resultat que les deux registres sont maintenant charges de la 
meme maniere. 

Ligne 15 

Incrementation de DE, qui est maintenant, lui aussi, pointe correcte- 
ment pour le transfert. Sur I'exemple du preambule, HL et DE seraient 
respectivement pointes sur 49230 et 49231. 



Ligne 16 






Le compteur de transfert (ou compteur de trait) est charge avec 79. 
Tout est pret pour le transfert repetitif, mais n'oublions pas qu'il faut 
d'abord sauvegarder le contenu du dernier octet du trait. 

Ligne 17 

Realisation de cette sauvegarde : le contenu de ('emplacement 
memoire adresse par DE est charge dans A. C'est done dans ce registre 
A que nous pourrons, quand nous en aurons besoin, recuperer cette 
valeur. 

Ligne 18 

Transfert repetitif de bloc avec decrementation. Cette instruction a 
ete suffisamment ete developpee dans le preambule, et nous n'y 
reviendrons pas. Resumons simplement la situation lorsque ce transfert 
est termine (la encore, nous prendrons I'exemple du premier trait de la 
figure du preambule) : 

HL est charge avec 49151, DE avec 49152, BC avec 0. Le premier 
trait est decale d'une position vers la droite, et le contenu initial de 
49231 est dans A. 
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Ligne 19 

Le contenu de A est charge dans ('emplacement memoire adresse 
par DE. Cela se passe bien sur de commentaire. 

Le travail sur ce premier trait est done termine, restent les sept 
autres. Mais il s'agit de verifier, avant de recommencer l'ope>ation pour 
le trait suivant, si les huit traits n'ont pas deja ete decales, auquel cas 
le programme serait terming. 

Ligne 20 

Recuperation, sur la pile, de la valeur actuelle du compteur general, 
qui se retrouve dans BC (rappelons que cette valeur tient sur un seul 
octet, qu'elle avait ete chargee dans B avant empilement, et que la 
valeur eventuellement contenue dans C nous est indifferente). 

Ligne 21 

Une nouvelle instruction, une des plus puissantes du Z 80 : decremen- 
tation de B et saut relatif si non nul (ici le saut eventuel est de + 1, en 
ligne 23). 

A la huitieme decrementation de B, done quand les huit traits auront 
ete traites le saut ne se fera pas et le programme continuera en ligne 
22, qui provoquera le retour au BASIC. Si ce n'est pas le cas, le 
programme saute a la ligne 23, pour traiter le trait suivant : 

Ligne 23 

La nouvelle valeur du compteur general est sauvegardee. 

Ligne 24 

Pour nous occuper du trait suivant, il nous faut d'abord pointer HL 
et DE respectivement sur I'avant-dernier et le dernier octets de ce trait. 

On se rend compte qu'il est possible de pointer HL en ajoutant tout 
simplement 2127 a sa valeur actuelle (si par exemple nous venons de 
finir le premier trait, 49151 +2127 = 51278). Cela est bien entendu 
valable quel que soit le numero de trait. 

Cette ligne 24 charge DE avec 2127. 

Ligne 25 

Saut relatif de -21, en ligne 12. La, HL est additionne a DE, puis DE 
est charge comme HL, puis DE est increments, etc. La boucle est done 
bouclee, et les huit traits successifs seront traites de la meme maniere. 
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Les lignes 26 a 40, s'occupant du defilement vers la gauche, sont 
I'exact pendant des lignes 11 a 25, vous pouvez done les etudier seul. 
Rappelons simplement que HL doit etre cette fois pointe sur le deuxieme 
octet du trait concerne, et DE sur le premier. D'autre part, le transfert 
repetitif se fera avec incrementation. 

Ce programme fonctionne indifferemment dans les trois modes. Si 
vous fournissez un numero de ligne errone, il se contente en principe 
de ne pas fonctionner et ne se detruit pas. 

En vous basant sur cet exemple, vous pouvez bien entendu concevoir 
d'autres programmes du meme genre : defilement de plusieurs lignes, 
defilements inverses et simultanes, defilements verticaux, etc. 

En voici un exemple d'utilisation : 

100 MODE 1 

110 LOCATE 1,12 : PRINT "VOICI UN DEFILEMENT VERS LA 

DROITE..." 
120 FOR 1= 1 TO 300 : CALL 43830,12,1 : NEXT I 
130 CLS : LOCATE 1,12 : PRINT "... EN VOICI UN VERS LA 

GAUCHE" 
140 FOR I = 1 TO 300 : CALL 43830,12,0 : NEXT I 
150 CLS : LOCATE 8, 12 : PRINT "ET ENFIN, LES 2 

ENSEMBLES" 
160 FOR I = 1 TO 14 : CALL 43830,12,0 : NEXT I : FOR I = 

1 TO 14 : CALL 43830,12,1 : NEXT I : GOTO 160 



. 
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5. DESSIN D'UN CERCLE 



Ce programme est certainement I'un des plus complexes de tous ceux 
que presente cet ouvrage, essentiellement parce que nous allons y 
manipuler des variables de deux types : entieres ou a virgule flottante. 

A cet egard, il est indispensable d'avoir lu au prealable I'Annexe V, 
ou tout au moins sa premiere partie (Les variables numeriques). 

Le programme debute en 43680, finit en 43877 (chiffre de verification : 
27097), n'est pas directement relogeable, et son format d'appel est le 
suivant : 

CALL 43680,XC,YC,R,C,PV 

• XC et YC sont les coordonnees du centre du cercle. 

• R est la longueur du rayon (exprimee en pixels). 

• C est la couleur. 

• PV determine si le cercle doit etre plein ou vide (0 : vide, 1 : plein). 

Le parametre PV sera optionnel. S'il n'est pas indique, le cercle sera 
vide. 

Par ailleurs, une protection sera etablie, qui provoquera un retour 
immediat au BASIC si I'instruction CALL n'est pas suivie de quatre ou 
cinq parametres. Avec certains programmes, en effet, I'oubli d'un ou 
de plusieurs parametres peut provoquer des catastrophes. Ce genre de 
protection permet d'eviter ces desagrements. 

Vous savez certainement que I'equation d'un cercle se presente sous 
la forme : 

X = XC + R * Cos(a) 
Y = YC + R * Sin(a) 

la valeur a etant la valeur de Tangle qui varie de a 360 degres. 

Nous allons done utiliser dans ce programme les routines &BD8B et 
&BD88 permettant de calculer respectivement les sinus et les cosinus. 
Ces routines sont malheureusement assez lentes et e'est pour gagner 
du temps que nous allons utiliser une petite astuce grace a laquelle 
nous n'aurons a calculer que les sinus et cosinus des angles allant de 
a 90 degres au lieu d'avoir a le faire de a 360 degres. 

La figure ci-dessous servira a expliquer le processus : 
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X1, Y1 




X2, Y2 



X3, Y3 



Chaque fois que nous aurons calcule les coordonnees d'un point 
(X.Y), dont Tangle correspondant variera de a 90°, nous calculerons 
les coordonnees relatives par rapport a ce point du point (X1, Y1), puis 
les coordonnees relatives de (X2,Y2) par rapport a (X1.Y1), et enfin les 
coordonnees relatives par rapport a (X2.Y2) de (X3,Y3). Les quatre 
quadrants seront done dessin^s simultanement. Remarquons que les 
coordonnees relatives de : 

(X1,Y1) par rapport a (X,Y) sont : - 2 (X - XC), ; 
(X2.Y2) par rapport a (X1,Y1) sont : 0, - 2 (Y - YC) ; 
(X3.Y3) par rapport a (X2.Y2) sont : 2 (X - XC), 0. 

A ce sujet, revoir eventuellement TAnnexe II. 

II faut enfin savoir que nous aurons, au cours de ce programme, a 
stocker provisoirement un certain nombre de variables. C'est la raison 
pour laquelle les cases memoires 43878 a 43895 sont divisees en cinq 
"placards" dans lesquels nous rangerons ces variables (voir en fin de 
listing la maniere dont sont disposes ces placards). 

Voyons maintenant le deroulement ligne par ligne de ce programme 
(dans un premier temps, nous laisserons de cote les lignes 1 a 17, qui 
rendent le cinquieme parametre optionnel et installent la protection 
evoquee plus haut). Considerons done pour Tinstant que le programme 
debute en ligne 18, et qu'il n'y a que quatre parametres derriere notre 
instruction CALL (XC,YC,R,C). Le cercle trace sera done vide. 
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LIGNE 


ADRESSE DU 
DE CETTE 

DEC. 


1ER CODE CODE-MACHINE 
LIGNE 

HEXA. 


MNEMONIQUE 




1 


43680 


21,30,AB 


LD HL, 43824 




2 


43683 


36, ED 


LD (HL),237 




3 


43685 


21,41,AB 


LD HL, 43841 




4 


43688 


36, ED 


LD (HL),237 




5 


43690 


FE,4 


CP 4 






43692 




no i *; 


JR Z,22 




6 








'7 


43694 




FE.5 


CP 5 




8 


43696 




CO 


RET NZ 




9 


43697 




AF 


XOR A 




ID 


43698 




OD.BE.O 


CP (IX*0) 




11 


43701 




1 28, A 


JR Z,10 




12 


43703 






21,30, AB 


LD HL, 43824 




13 


43706 






36, F9 


LD (HL),249 




14 


43708 






21,41, AB 


LD HL, 43841 




15 


43711 






36, F9 


LD (HL),249 




16 


43713 






— >DD,23 


INC IX 




17 


43715 




DD,23 

^ rin no 7t no 


INC IX 

LD (43893), IX 

LO A, 90 




18 
19 


43717 
43721 






3E,5A 




20 


43723 


32,77,AB 


LD (43895), A 




21 


43726 


DD,7E,0 


LD A,(IX+0) 




22 


43729 


CD.DE.BB 


CALL 48094 




23 


43732 


DD,66,3 


LD H,(IX+3) 




24 


43735 


DD,6E,2 


LD L,(IX+2) 




25 


43738 


11,66, AB 


LD DE, 43878 




26 


43741 
43744 




CD, 40, BO 


CALL 48448 




27 


— »2A,77,AB 


LD HL, (43895) 




28 


43747 




11,6B,AB 


LD DE, 43883 




29 


43750 




CD,40,BD 


CALL 48448 




30 


43753 




CD,8B,BD 


CALL 48523 




31 


43756 




11,66,AB 


LD DE, 43878 




32 


43759 




CD,61,BD 


CALL 48481 




33 


43762 




CD,46,BD 


CALL 48454 




34 


43765 




DD,2A,75,AB 


LD IX, (43893) 




35 


43769 




CD,58,flB 


CALL 43864 




36 


43772 




19 


ADD HL.DE 




37 


43773 




22,6B,A8 


LD (43883), HL 




"38 


43776 




2A, 77,ttB 


LD ML, (43895) 




39 


43779 




11,70,AB 


LD DE, 43888 




40 


43782 




CD,40,BD 


CALL 48448 




41 


43785 




CD,88,BD 


CALL 48520 




42 


43788 




11,66,AB 


LD DE, 43878 




43 


43791 




CD,61,BD 


CALL 48481 




44 


43794 




CD,46,BD 


CALL 48454 




45 


43797 




DD,2A,75,AB 


LD IX, (43893) 




46 


43801 




CD,5F,AB 


CALL 43871 




47 


43804 






19 
ED,5B,68,AB 


ADD HL.DE 

LD DE, (43883) 




48 


43805 






49 


43809 




E5 


PUSH HL 




50 


43810 




05 


PUSH DE 




51 


43811 




CD,EA,B8 


CALL 48106 




52 


43814 




CD,58,AB 


CALL 43864 




53 


43817 




CD,4A,AB 


CALL 43850 




54 


43820 




CI 


POP 8C 




55 


43821 




D5 


PUSH DE 
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56 


43822 


C5 


PUSH BC 




57 


43823 


CD,E0,BB 


CALL 48109 




58 


43826 


CD,5F,AB 


CALL 43871 




59 


43829 


CD,4A,AB 


CALL 43850 




60 


43832 


EB 


EX DE.HL 




61 


43833 


CD,ED,BB 


CALL 48109 




62 


43836 


El 


POP HL 




63 


43837 


CD,50,AB 


CALL 43856 




64 
65 


43840 
43843 


CD.ED.BB 


CALL 48109 




21,77,AB 


LD HL, 43895 




66 


43846 


35 


DEC (HL) 




67 


43847 


F8 


RET M 




68 
69 


43848 

43850 AB4A 


18,96 


JR -106 




CI 


POP BC 




70 


43851 


El 


POP HL 




71 


43852 


C5 


PUSH BC 




72 


43853 


ED, 52 


SBC HL.DE 




73 


43855 


29 


ADD HL,HL 




74 


43856 AB50 


CD,C7,BD 


CALL 48583 




75 


43859 


EB 


EX DE.HL 




76 


43860 


21,0,0 


LD HL,0 




77 
78 


43863 

43864 AB58 


C9 


RET 




OD,56,7 


LD D,(IX+7) 




79 


43867 


DD,5E,6 


LD E.UX+6) 




80 


43870 


C9 


RET 




81 


43871 AB5F 


DD,56,5 


LD D,(IX + 5) 




82 


43874 


DD,5E,4 


LO E,(IX+4) 




83 


43877 


C9 







Le tableau suivant represents les cinq placards : 



43878 


AB66 


Placard R (rayon) 


















43883 


AB6B 


Placard Cosinus/Cos * R/XC + Cos * R 


















43888 


AB70 


Placard Sinus/Sin * R/YC + Sin * R 


















43893 


AB75 


Placard IX 






43895 


AB77 


Placard angle/compteur 
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Interessons nous tout d'abord au bloc constitue par les lignes 18 a 
37 qui se charge d'effectuer le calcul de I'abscisse X (rappelons que 
x = XC + R * Cos (a)). 

Ligne 18 

Le contenu du registre IX est range dans le placard prevu a cet effet 
(cases memoire 43893 et 43894). Ce registre est charge pour I'instant, 
comme nous le savons, avec I'adresse de I'octet faible de C, mais les 
routines Sinus et Cosinus que nous appellerons plus loin utilisent ce 
registre pour leur propre compte et vont done denaturer son contenu, 
e'est pourquoi il faut le sauvegarder. 

Ligne 19 

Chargement de I'accumulateur avec 90. Ce chiffre servira a la fois 
pour initialiser le compteur, et pour calculer les sinus et cosinus 
successifs des angles 90 a 0. 

Ligne 20 

Le contenu de A est range dans son placard (case memoire 43895). 
Une seule case suffit car la machine "salt" que le contenu de A ne 
peut en aucun cas etre superieur a 255. 

Lignes 21 et 22 

Chargement de A avec le numero de couleur choisi et appel de la 
routine &BBDE, qui fixe la couleur graphique. 

Lignes 23 et 24 

Chargement de HL avec R. 

Ligne 25 

Chargement de DE avec I'adresse de la premiere des cinq cases 
constituant le placard reserve au rayon R. Nous allons en effet 
transformer la representation de R (qui est pour I'instant stockee sous 
une forme entiere, e'est-a-dire sur 2 octets) en sa representation en 
virgule flottante, done sur 5 octets. Nous y sommes obliges car nous 
allons travailler avec le bloc de routines "Arithmetique avec virgule 
flottante". 

Bien entendu, la valeur R reste la meme, seule change sa representa- 
tion. 
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Ligne 26 

Appel de la routine &BD40 : "Transformer la representation entiere 
d'un nombre en sa representation en virgule flottante". 

Le nombre traite doit au depart etre charge dans HL et I'adresse du 
placard ou I'on veut qu'il se retrouve doit etre chargee dans DE. 

Apres ('execution de cette ligne, la representation en virgule flottante 
de R est done rangee dans les cases memoire 43878 a 43882. 

Ligne 27 

Chargement de HL avec le contenu de 43895, e'est-a-dire avec la 
valeur de Tangle a ce moment : 90 au premier tour de boucle, 89 au 
deuxieme, 88 au troisieme, etc. 

Ligne 28 

Chargement de DE avec I'adresse du placard reserve aux cosinus (on 
peut egalement dire : pointage de DE sur ce placard}. 

Ligne 29 

Comme pour le rayon, transformation en virgule flottante et range- 
ment du resultat au placard. 

II faut savoir qu'au retour de la routine &BD40, les contenus des 
registres HL et DE ne sont plus les memes. Au cours de ses manipulations, 
la routine les modifie et, apres son execution, e'est maintenant HL, et 
non plus DE, qui est charge avec I'adresse du placard. 

La maniere dont doit etre charge un registre avant I'appel d'une 
routine s'appelle le registre d'appel, et son etat lorsqu'il revient le 
registre de reponse. 

Ligne 30 

Appel de la routine &BD8B qui calcule le cosinus d'un angle. 
Registre d'appel: HL doit etre charge avec I'adresse de la variable que 
I'on veut traiter (ce qui etait bien le cas apres la ligne 29). 

Registre de reponse : HL reste inchange. Le resultat est range a la place 
de la variable. 

Ligne 31 

Chargement de I'adresse du rayon R dans DE, en prevision de 
■'utilisation de la routine &BD61 en ligne 32. 
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Ligne S* 

Appel de la routine &BD61 qui effectue la multiplication de deux 
nombres. 

Reeistres d 'appel : HL et DE doivent respectivement etre charges avec 
I'adresse du premier et du deuxieme nombre. 

Registres de reponse . HL reste inchange, mais pas DE. Le resultat de la 
multiplication est charge a I'adresse pointee par HL (notons que le 
nombre adresse au depart par DE reste inchange). 



Ligne 33 

Appel de la routine &BD45, qui effectue I'operation inverse de la 
routine &BD40, puisqu'elle transforme une representation en virgule 
flottante en une representation entiere. 

Registre d 'appel : HL doit etre charge avec I'adresse du nombre. 
Registre de reponse: HL contient le nombre entier, c'est-a-dire mainte- 
nant R * Cos(a). 

Ligne 34 

Chargement de IX avec le contenu de I'emplacement memoire 
d'adresse 43893. Ce registre est done maintenant recharge avec sa 
valeur initiale sauvegardee en ligne 18. 

Ligne 35 

Une ligne un peu particuliere : il s'agit de I'appel du sous-programme 
interne d'adresse 43864 (lignes 78 a 80). Ce sous-programme a pour 
fonction de charger DE avec XC. Nous aurons en effet besoin d'effectuer 
plusieurs fois cette operation, et il est done rentable de faire un sous- 
programe specifique qu'il suffit d'appeler. Ce sous-programme est 
extremement simple : 

Lignes 78 et 79 : Chargement de DE avec XC 

Ligne 80 : Retour de sous-programme (done a la ligne 36) 

Plusieurs remarques s'imposent neanmoins : 

1 Cette routine permet d'economiser trois octets chaque fois que I'on 
aura besoin de charger DE avec XC. L'appel necessite trois octets ; 
mais, s'il fallait charger directement DE, il en faudrait six. 

2 L'instruction de retour d'un sous-programme interne est la m§me 
que celle d'un retour de l'instruction CALL. 
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3. La regie evoquee au debut de I'ouvrage est plus que jamais valable- 
si la pile est manipulee au cours d'un sous-programme, elle doit etre 
remise en etat avant que le retour soit provoque par ('instruction 
C9. 

Ligne 36 

DE etant maintenant charge avec XC et HL avec R * Cos(a), ils sont 
additionnes pour obtenir enfin I'abscisse de notre premier point: 
XC + R * Cos(a). 

Le resultat de cette addition se trouve dans HL. 






Ligne 37 



Mise au placard de ce resultat. Notons qu'il s'agit d'un entier, 
maintenant, et qu'il est done range sur 2 octets : 43883 et 43884. 

Les lignes que nous venons d'etudier peuvent en fait etre separees 
en blocs distincts : 

• Le premier va des lignes 18 a 26 et se charge de sauvegarder IX, de 
sauvegarder la valeur du compteur, de transformer R en virgule 
flottante et de le ranger une fois pour toutes dans son placard. Ces 
differentes taches n'auront a etre executees qu'une seule fois. 

• Le second bloc (lignes 27 a 36) se charge du calcul XC + R * Cos(a). 
La ligne 37 sauvegarde ce resultat. 

Les lignes 38 a 47 sont identiques aux lignes 27 a 36, si ce n'est que 
la ligne 41 appelle la routine Sinus au lieu de Cosinus, et que I'on se 
sert dans ce bloc du placard reserve aux sinus. De meme, I'appel au 
sous-programme 43871 de la ligne 46 charge DE avec YC au lieu de XC. 

II est done inutile de refaire une etude ligne par ligne de ce bloc 
charge de calculer YC + R * Sin(a), et nous nous contenterons de 
resumer la situation apres son execution (done immediatement apres la 
ligne 47) : 

1. L'abscisse X du point (X,Y) que nous voulons dessiner a ete calculee 
precedemment et stockee a I'adresse 43883. Elle s'y trouve toujours. 

2. L'ordonnee Y du meme point vient d'etre calculee et se trouve, apres 
I'execution de la ligne 47, dans HL. 

Nous allons maintenant etudier le bloc allant de la ligne 48 a la 
ligne 64. Ce bloc va tracer le point (X,Y), puis (X1,Y1), puis (X2.Y2), et 
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fj n (X3.Y3). (Revoir a ce sujet la figure du debut et les explications 
s'y rapportant.) 

Ligne 48 

Chargement de DE avec X. 

Lignes 49 a 50 

Sauvegarde, en les rangeant sur la pile, de Y puis de X (attention a la 
pile, ca va se compliquer...). 

Ligne 51 

Appel de la routine &BBEA qui dessine sur I'ecran le point de 
coordonnees X,Y. 

Registres d' appel . DE doit etre charge avec I'abscisse X et HL avec 
I'ordonnee Y. 
Registres de retour : tous modifies. 

Ce premier point etant trace, nous allons maintenant nous occuper du 
point (X1,Y1) dont les coordonnees relatives par rapport au precedent 
sont : - 2 (X - XC), 0. Nous devrons done d'abord calculer - 2 (X - XC). 



Ligne 52 






Chargement de DE avec XC. 

Ligne 53 

Appel du sous-programme interne d'adresse 43850, allant des lignes 
69 a 77. 

Voyons ce que fait cette routine : 

Lignes 69, 70 et 71, ou 'Tart et la maniere d'eviter un enorme 
piege". 

En effet, qu'y a-t-il sur la pile au moment ou Ton arrive a la ligne 
69? X? Eh bien non, justement. N'oubliez pas que, lorsque le 
programme rencontre un appel de sous-programme, I'adresse de 
retour est empilee et ne sera depilee qu'au moment du retour. Au 
sommet de la pile se trouve done pour I'instant I'adresse 43820. 
Cette adresse est soulevee, X qui est en-dessous est charge dans 
HL, puis I'adresse est reposee sur la pile. 

Ligne 72 : DE est soustrait de HL. Le resultat (X — XC) se retrouve 
dans HL. 
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Ligne 73 : HL est additionne a lui-meme, ce qui revient a le 
multiplier par 2. HL contient maintenant 2 (X - XC). 

Ligne 74 : Appel de la routine de changement de signe deja etudiee. 
HL est maintenant charge avec — 2 (X — XC). 

Ligne 75 : Echange des contenus de HL et DE. 

Ligne 76 : HL est charge avec 0. 

Ligne 77 : Retour de sous-programme. Rappelons encore une fois 
que I'adresse de retour est en meme temps depilee. 

Lignes 54, 55, 56 

Sauvegarde de - 2 (X - XC), en s'arrangeant pour que Y reste au 
sommet de la pile. 

Ligne 57 

HL etant toujours charge avec et DE avec - 2 (X - XC), appel de 
la routine &BBED qui dessine un point a une position relative au 
curseur graphique, ce dernier se trouvant alors en (X.Y), c'est-a-dire au 
dernier point trace. 

Registres d'appel : I'abscisse et I'ordonnee relatives doivent se trouver 
respectivement dans DE et HL. 

Notre deuxieme point (X1,Y1) est done trace et le curseur graphique y 
est positionne. Nous pouvons nous attaquer au troisieme point (X2,Y2) 
de coordonnees relatives 0, — 2 (Y - YC). 

Ligne 58 

Appel du sous-programme interne d'adresse 43871 qui charge DE 
avec YC. 

Ligne 59 

Appel du sous-programme interne d'adresse 43850, deja etudie a la 
ligne 53. Cette fois, il va calculer - 2 (Y - YC). Au retour, HL est charge 
avec et DE avec - 2 (Y - YC). 



Ligne 60 






Inversion de HL et D. Cette fois en effet, e'est I'abscisse qui doit §tre 
egale a 0. 
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Appel de la routine &BBED, deja etudiee. Notre troisieme point etant 
trace, reste le quatrieme, de coordonnees relatives 2 (X — XC), 0. 

Ligne 62 

Si vous avez bien suivi I'etat de la pile, vous savez qu'il s'y trouve 
actuellement au sommet la valeur — 2 (X — XC), sauvegardee en ligne 55. 
La ligne 62 charge cette valeur dans HL. 

Ligne 63 

Appel du sous-programe interne d'adresse 43856 (ligne 74). Notons 
que ce programme est en partie le meme que celui qui est appele aux 
lignes 53 et 59. 

Le signe de HL est inverse, HL et DE sont echanges et HL est charge 
avec 0. Au retour de cette routine, HL est done charge avec et DE 
avec 2 (X - XC). 

Ligne 64 

Trace du quatrieme point (X3.Y3). 

Nos quatre points etant traces, nous allons passer a I'angle suivant 
apres avoir verifie I'etat du compteur. C'est le role des lignes 65 a 67. 

Ligne 65 

HL est charge avec I'adresse du placard Angle. 

Ligne 66 

Une nouvelle instruction : "Decrementer le contenu de ('emplacement 
memoire adresse par HL." L'angle est done diminue de 1. 






Ligne 67 

Encore une nouvelle instruction : "Retour conditionnel de sous- 
programme." Si le resuhat de I'operation de la ligne 66 est inferieur a 
0. alors le retour au BASIC est effectue, sinon le programme se poursuit 
en sequence. 

Ligne 68 

Saut relatif de —106 (en ligne 27). Le programme va ainsi boucler 
l Us qu'a ce que toutes les valeurs de Tangle, de 90 a 0, aient ete traitees. 
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Les trois blocs suivants sont les trois sous-programmes deja etudies j 

Lignes 69 a 77 

Calcul de -2(X - XC) ou -2(Y - YC). 

Lignes 78 a 80 

Chargement de DE avec XC. 

Lignes 81 a 83 

Chargement de DE avec YC. 

Nous pouvons maintenant etudier les lignes 1 a 17 qui rendent 
optionnel le parametre PV (plein / vide) et protegent le programme en 
provoquant un retour immediat au BASIC s'il n'y a pas quatre ou cinq 
parametres. 

Detaillons tout d'abord la procedure qui va nous permettre de 
dessiner un cercle plein. 

Reconsiderons la figure du debut. Le processus de trace des quatre 
points doit etre maintenant bien clair pour tout le monde : 

1. Trace du point (X.Y). 

2. Trace du point (X1.Y1) relativement a X,Y. 

3. Trace du point (X2.Y2) relativement a (XI. Y1). 

4. Trace du point (X3.Y3) relativement a (X2.Y2). 

Mais que se passerait-il si I'on y apportait les modifications suivantes : 

1. Trace du point (X,Y). 

2. Trace d'une ligne relative d'extremite (X1.Y1). 

3. Trace du point (X2.Y2) relativement a (X1.Y1). 

4. Trace d'une ligne relative d'extremite (X3.Y3). 

Eh bien, tout simplement ceci : 
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X1, Y1 







i 



X2, Y2 






X3, Y3 



En procedant ainsi, les lignes tracees les unes contre les autres, au 
fur et a mesure que a varie de 90 a 0, formeront un cercle plein. 

Le point (X1.Y1) est trace en ligne 57 grace a la routine &BBED et le 
point (X3.Y3) en ligne 64 grace a la meme routine. II suffirait done de 
remplacer cette routine &BBED par la routine &BBF9 qui trace une 
ligne de la position du curseur jusqu'a la position relative indiquee. 

Les lignes 57 et 64 se situent en memoire comme ceci : 



43823 


CD 


43840 : CD 


43824 


ED 


43841 : ED 


43825 


BB 


43842 : BB 



On peut done se contenter de charger les cases memoire 43824 et 
43841 avec &F9 pour obtenir un appel non plus a &BBED, mais a 
&BBF9. 

C'est ce que realise le bloc de lignes 5 a 17 : 

Ligne 5 

Cette ligne nous permet une decouverte extremement importante : il 
faut savoir en effet qu'au moment de I'appel CALL le nombre de 
Parametres qui se trouvent effectivement derriere ('instruction est 
automatiquement charge dans I'accumulateur. 

Cette ligne 5 effectue une comparaison (deja etudiee) entre I'accumu- 
ateur et le chiffre 4. Si le resultat est 0, cela voudra done dire qu'il y a 
ex actement quatre parametres derriere I'instruction CALL. 
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Ligne 6 

Si le resultat de I'operation de la ligne 5 est 0, alors saut relatif de 
22. Cela signifie en effet que le parametre PV est omis, et que le cercle 
doit etre vide. 

Si ce n'est pas le cas, le programme se poursuit en sequence. 

Ligne 7 

Comparaison entre I'accumulateur et 5. 

Ici se trouve la protection evoquee plus haut : a ce point du 
programme, nous savons deja qu'il n'y a pas quatre parametres. Nous 
verifions maintenant s'il y en a cinq. Si e'est le cas, le resultat de 
I'operation sera 0, sinon il sera different de 0. 

Ligne 8 

S'il n'y a ni quatre ni cinq parametres, e'est done qu'il y a une erreur 
dans le format d'appel. Dans ce cas, cette instruction "Retour de sous- 
programme si non nul" provoque le retour au BASIC. 

Dans le cas contraire, e'est que le parametre PV a ete mis, et qu'il 
va done talloir le tester. 

Ligne 9 

Litteralement : "Oil exclusif logique entre I'accumulateur et lui- 
meme." Sans entrer dans les details, il suffit de savoir que cette 
instruction nous sert a mettre I'accumulateur a (e'est plus simple que 
d'utiliser ('instruction de chargement). 

Ligne 10 

Comparaison entre A (charge avec 0) et le parametre PV. 

Ligne 11 

Si le resultat de I'operation de la ligne 10 est 0, alors le cercle doit 
etre vide et cette ligne provoque un saut relatif de 10 (en ligne 16). 
Sinon, le cercle doit etre plein et le programme se poursuit en sequence. 
Voyons d'abord ce dernier cas. 

Ligne 12 

Chargement de HL avec I'adresse 43824, celle qui doit etre modifiee 
de maniere a obtenir I'appel de la routine tracant une ligne au lieu 
d'un point. 
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Ligne U 

Chargement de la case memoire adressee par HL avec la donnee 249 
(&F9). 



Lignes 14 et 15 

Meme processus, mais avec I'adresse 43841. 






Lignes 16 et 17 

Deux incrementations successives de IX ; voyons pourquoi : 
Nous avons dit que la partie principale du programme a ete ecrite en 
posant comme hypothese que ^instruction CALL ne serait suivie que 
de quatre parametres (il fallait bien choisir entre quatre et cinq puisque 
PV est optionnel). Cette hypothese implique bien entendu que le registre 
IX est pointe au depart comme le montre la partie gauche du tableau 
ci-apres : 








Pointage de IX 
si 4 Parametres 


Pointage de IX 
si 5 Parametres 


PV 




IX + 




IX + 1 


c 


IX + 


IX + 2 


IX + 1 


IX + 3 


R 


IX + 2 


IX + 4 


IX + 3 


IX + 5 


YC 


IX + 4 


IX + 6 


IX + 5 


IX + 7 


XC 


IX + 6 


IX + 8 


IX + 7 


IX + 9 



Si I'instruction CALL est suivie de cinq parametres, par contre le 
pointage de IX est tel que montre dans la colonne de droite. 

Les pointages sont done differents selon le cas, ce qui pose probleme 
puisque le programme est commun. 

La double decrementation des lignes 16 et 17 apporte la solution en 

rendant ces pointages identiques. Ainsi, si nous utilisons le programme 

en transmettant cinq parametres et que par exemple YC doive etre 

charge, nous ne serons plus obliges d'utiliser IX + 6 et IX + 7, puisque 

a valeur 2 aura ete au prealable ajoutee a IX. Nous utiliserons done 
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IX + (6 - 2) et IX + (7 - 2), soit IX + 4 et IX + 5, comme dans le cas 
oil il y a quatre parametres. 

Le saut relatif de la ligne 11 s'explique de la meme maniere. 

Revenons maintenant aux lignes 1 a 4. 

Elles initialisent le programme en chargeant les cases memoire 43824 
et 43841 avec la donnee 237 (&ED). Apres ces lignes, le programme est 
done un programme "cercle vide". Pourquoi ces lignes ? 

Imaginons qu'elles n'existent pas et que dans un programme BASIC, 
vous ayez a utiliser le programme cercle plein. Les lignes 12 a 15 vont 
faire les modifications necessaires et cela marchera. Mais si jamais, 
dans le meme programme BASIC, vous avez a utiliser ensuite le 
programme "Cercle vide", cela ne marchera plus, et pour cause ; si la 
modification vide — plein est prevue, il n'en est pas de meme pour 
I'inverse plein — vide et vous ne pourrez plus dessiner que des cercles 
pleins. C'est pourquoi les lignes 1 a 4 initialisent systematiquement le 
programme "Cercle vide" avant le test eventuel du parametre PV. 

Remarque 

Revenons un court instant aux lignes 20 et 65. La premiere charge 
I'emplacement memoire 43895 avec 90 (il s'agit de Tangle de depart). 
La ligne 65 charge le registre HL avec le contenu de I'emplacement 
memoire d'adresse 43895. 

Mais attention : comme il s'agit d'un registre double, L sera charge 
avec (43895), et H avec (43896). Or, ce dernier emplacement n'est en 
rien modifie par la ligne 20, puisque le chargement se fait alors grace a 
un registre simple. Si done, au moment ou le programme a et<§ charge, 
il n'y avait rien (done 0) a cet emplacement, tout ira bien et HL sera 
correctement charge avec la valeur de I'angle. Mais si un programme 
est deja venu occuper cette adresse, il se peut que I'emplacement 
43896 soit toujours charge avec une valeur quelconque. Dans ce cas, 
et pour 6viter que HL soit charge avec une valeur incorrecte, il faudra 
inserer, avant ou apres le programme de chargement, la ligne : 

POKE 43896,0 



Naturellement, cette precaution pourrait aussi etre facilement integree 
dans le programme lui-meme. 

L'etude de ce programme 6tant terminee, voici quelques exemples 
de son utilisation : 
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100 CLS:DEG 

110 FOR 1 = 110 TO 10 STEP -11 

120 C = C+1: IFC = 4THEN C=1 

130 CALL 43680,200,200,1,0 : CALL 43680,400,200,1, C 1 
140 NEXT ! 

Evidemment, une fois un programme en langage machine au point, 
on peut toujours s'amuser a le "torturer" un peu. 

Essayez par exemple de supprimer le DEG de la ligne 100. 
Ou bien laissez le DEG mais inserez la ligne suivante : 

105 POKE 43722,50 
Ou encore, enlevez le DEG et inserez : 

105 POKE 43722,5 
Un dernier exemple enfin, encore plus spectaculaire. Inserez la ligne : 

105 POKE 43722,5 : POKE 43834.&F9 

et modifiez le "1=110" de la ligne 110 en "1=165". Essayez une fois 
avec le DEG et une fois sans. 



II reste a signaler que le programme fonctionne indifferemment dans 
les trois modes, et a parler un peu de sa vitesse d'execution. 

Pour un cercle vide, un programme BASIC aura un temps d'execution 
d'environ 12,8 secondes, alors que notre programme en langage machine 
en aura un d'environ 2,8 secondes. Le gain de temps n'est certes pas 
negligeable, mais on ne peut pas dire non plus que ce soit extraordinaire. 

Cette relative lenteur est due, comme nous I'avons deja dit, aux 
routines Sinus et Cosinus. La difficulty est incontournable, tout au 
moins d'une maniere parfaitement elegante, a moins de fabriquer de 
toutes pieces un algorithme sinus et cosinus, ce qui est un autre 
probleme. 

N6anmoins, pour les "mordus" du cercle, le programme suivant 
propose une autre solution et execute la meme tache en un peu plus 
d'une demi-seconde. Mais on n'a rien sans rien, et cela va nous couter 
quelque 910 octets, non pas a cause du programme lui-meme, rassurez- 
vous, mais tout simplement parce que nous allons avoir besoin d'un 
6norme placard ! 
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6. CERCLE RAPIDE 






Attention, il est absolument necessaire d'avoir au prealable etudie le 
programme precedent avant de passer a celui-ci. 

Ce programme de cercle rapide est base sur une idee fort simple : 
puisque les routines Sinus et Cosinus sont lentes, nous allons nous 
arranger pour les utiliser le moins possible. Pour ce faire, une solution 
vient immediatement a I'esprit : calculer les sinus et cosinus des angles 
qui nous interessent une fois pour toutes, et les ranger dans un tableau 
ou nous n'aurons plus qu'a les lire. 

Ce tableau comprendra 910 octets (de 42985 a 43894), et son 
remplissage se fera grace a un petit programme BASIC qu'il suffira de 
lancer une fois avant le premier appel du programme "Cercle rapide". 
On pourra ensuite utiliser ce dernier autant de fois que I'on voudra, et 
la relative longueur d'execution du remplissage (environ 8,6 secondes) 
n'est de ce fait pas genante. 

Voici le programme BASIC : 

10 MEMORY 42984 : DEG : T = 42985 

20 FOR I = 90 TO STEP -1 

30 A = C0S(l) : FOR H = TO 4 : POKE T + H,PEEK(@ A + H) : 

NEXTH :T = T + 5 
40 A = SIN(I) : FOR H = TO 4 : POKE T + H,PEEK(@ A + H) : 

NEXTH : T = T + 5 
50 NEXT I 

Si vous avez lu en Annexe V la section concernant les variables 
numeriques, vous devriez le comprendre facilement : 

La representation en virgule flottante de COS(90) est stockee sur 
5 octets (42985 a 42989), puis celle de SIN(90) sur les cinq suivants 
(42990 a 42994), puis celle de COS(89) sur les cinq suivants, puis celle 
de SIN(89), et ainsi de suite jusqu'a compris. En bref, les cosinus et 
sinus alternent dans le tableau de 5 en 5 octets. 

La plus grande partie du programme fonctionne exactement de la 
mime maniere que le precedent et beaucoup de lignes sont identiques. 
Elles ne seront plus expliquees autrement que par un renvoi aux lignes 
ou blocs de lignes identiques du programme precedent. 

II ne faut toutefois pas oublier que, ce programme n'ayant pas la 
meme situation en memoire. les adresses internes (placards et sous- 
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programmes internes) seront differentes. Les placards, par exe I 
commencent a I'adresse 42967 (&A7D7). Cela n'empeche evidemment 
pas que les demarches soient identiques. 

Precisons enfin que toute la premiere partie (rendant PV optionnel et 
installant la protection) n'a pas ete reecrite. Vous pouvez, bien sur 
I'ajouter. 

Tel qu'il est done, ce programme ne peut soutenir que quatre 
parametres et ne dessine que des cercles vides. II commence en 42800 
finit en 42966, n'est pas directement relogeable, et son format d'appei 
est le suivant : 

CALL 42800,XC,YC,R,C 

Son chiffre de verification est 26406. 

Une petite astuce : si vous ne vous sentez pas le courage necessaire 
pour ajouter la partie permettant I'option plein / vide, essayez ceci : 

• Pour un cercle plein. ajoutez, immediatement avant I'appel du 
programme, la liane : 

POKE 42927.&F9 : POKE 42910, &F9 

• Pour un cercle vide, remplacez &F9 par &ED. 



Ce procede est, disons-le, assez rudimentaire et plutot lourd a utiliser, 
mais il a au moins le merite d'etre simple a mettre en place. 
Voici le listing de ce sixieme programme ; 



LIGNE ADRESSE DU 1ER CODE 
DE CETTE LIGNE 



1 
2 
3 
4 
5 
6 
7 



_9 

10 
11 
12 
13 
14 
15 
16 



DEC. 

42800 
42804 
42806 
42809 
42812 
42815 
42818 
42821 
42824 



42827 
42830 
42833 
a 23"* 'i 
42837 
42839 
42840 



HEXA. 



CODE-MACHINE 



MNEM0NIQUE 



DD,22,E6,A7 


LD (42982), IX 


3E.5A 


LD A, 90 


32,E8,A7 


LD (42984), A 


DD,7E,0 


LD A,(IX+0) 


CD,0E,BB 


CALL 48094 


DD, 66, 3 


LD H,(IX+3) 


DD,6E,2 


LD L,(IX+2) 


11,D7,A7 


LD DE, 42967 


CD, 40,80 


CALL 48448 


21,E9,A7 


LD HL, 42985 


1,5,0 


LD BC,5 


C5 


PUSH BC . 


11, DC, A? 


LD DE, '12972 


ED, B0 


LOIR 


D5 


PUSH DE 


E5 


PUSH HL ^ 
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17 


42841 


21.0CA7 LD HL, 42972 


18 


42844 


11,07, A7 LU Dk,ti/y(>/ 


19 


42847 


CD, 61,80 CALL 48481 


20 


42850 


CD, 46, BO CALL 48454 


21 


42853 


DD,2A,E6,A7 LD IX, (42982) 


22 


42857 


CD,C9,A7 CALL 42953 


23 


42860 


19 ADD DE.HL 


24 


42861 


22,DC,A7 LD (42972), HL 


25 


42864 


El HUH HL 


26 


42865 


Dl POP DE 


27 


42866 


CI POP BC 


28 


42867 


C5 PUSH BC 


29 


42868 


ED, BO LDIR 


30 


42870 


E5 PUSH HL 


31 


42871 


21. E1 ,A7 LD HL, 42977 


32 


42874 


ll,D7,AV LD DE.4Z96/ 


33 


42877 


CD,61,BD CALL 48481 


34 


42880 


CD.46.BD CALL 48454 


35 


42883 


DD,2A,E6,A7 LD IX, (42982) 


36 
37 


42887 
42890 


CD,D0,A7 CALL 42960 
19 ADD DE.HL 


38 


42891 


ED,5B,DC,A7 LD DE, (42972) 




42895 


E5 PUSH HL 


40 


42896 


D5 PUSH DE 


41 
42 


42897 


CD,EA,BB CALL 48106 


42900 


CD,C9,A7 CALL 42953 


43 


42903 


CD,BB,A7 CALL 42939 


44 


42906 


CI POP BC 


45 


42907 


05 PUSH DE 


46 

47 


42908 


C5 PUSH BC 


42909 


CD.ED.BB CALL 48109 


48 


42912 


CD,D0,A7 CALL 42960 


49 
50 


42915 


CD.BB.A7 CALL 42939 


42918 


EB EX HL.DE 


51 


42919 


CD.ED.BB CALL 48109 


52 


42922 


El POP HL 


53 


42923 


CD, CI ,A7 CALL 42945 


54 


42926 


CD.ED.BB CALL 48109 


55 


42929 


01 POP DE 


56 


42930 


CI POP BC 


57 


42931 


21, E8, A7 LD HL, 42985 


58 


42934 


35 DEC (HL) 


59 


42935 


F8 RET M 


60 


42936 


EB EX HL,DE 


61 


42937 


1 18,96 JR -106 


62 


42939 A7BB 


CI POP BC 


63 


42940 


El POP HL 


64 


42941 


C5 PUSH BC 


65 


42942 


ED, 52 SBC HL.DE 


66 


42944 


29 ADD HL.HL 


67 


42945 A7C1 


CD,C7,BD CALL 48583 


68 


42948 


EB EX HL.DE 


69 


42949 


21,0,0 LD HL,0 


70 


42952 


C9 RET 


71 


42953 A7C9 


DO, 56,7 LD D,(IX + 7) 


72 


42956 


DD,5E,6 LD E,(IX+6) 


73 


42959 


C9 RET 


74 


42960 A7D0 


DD,56,5 LD D,(IX+5) 


75 


42963 


0D,5E,4 LD E,(IX+4) 


76 


42966 


C9 RET 
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Lignes 1 a 9 

Meme processus et meme fonction que les lignes 18 a 26 du programme 
precedent 

Le bloc de lignes 10 a 14 va maintenant se charger de recopier la 
representation de Cos(a), stockee dans le tableau sur 5 octets, dans le 
placard Cosinus. 

Ligne 10 

HL est pointe sur le debut du tableau. 

Ligne 11 

BC est charge avec la valeur 5. Ce sera le compteur de transfert. 

Ligne 12 

Sauvegarde de cette valeur que nous aurons a reutiliser. 

Ligne 13 

DE est pointe sur le placard Cosinus. 

Ligne 14 

Transfert repetitif de bloc avec incrementation, deja etudie dans le 
programme "Defilement d'une ligne". Le contenu de I'octet sur lequel 
etait pointe HL ainsi que les quatre suivants sont respectivement charges 
dans I'octet sur lequel etait pointe DE, et dans les quatre suivants. La 
valeur Cos(a) est done bien maintenant stockee dans son placard (au 
premier tour de boucle, a = 90). 

A chaque tour de boucle, HL va ainsi parcourir le tableau de 5 en 5, 
pointant successivement sur Cos(a), Sin(a), cos(a— 1), Sin(a— 1), etc. 

Apres cette ligne 14, DE, qui a ete lui aussi increments cinq fois, est 
pointe sur le placard Sinus. 

Lignes 15 et 16 

Sauvegarde par empilement de DE, puis de HL. 

Ligne 17 

Pointage de HL sur le placard Cosinus. 
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Lignes 18 a 24 

Meme processus et meme fonction que les lignes 31 a 37 du 
programme precedent : calcul et rangement de X ( = XC+ R * Cos(a) ). 

Lignes 25 a 29 

Elles effectuent la meme operation que les lignes 10 a 14 vues 
precedemment, mais cette fois, c'est le sinus qu'il s'agit de recopier 
dans son placard. Une autre difference : c'est par depilement que les 
trois registres sont pointes ou initialises. A la fin de ces lignes, HL se 
retrouve pointe, dans le tableau, sur le cosinus de I'angle suivant. 

Ligne 30 

Sauvegarde de HL. 

Ligne 31 

Avant de passer au bloc suivant, pointage de HL sur le placard sinus. 

Lignes 32 a 54 

Meme processus et meme fonction que les lignes 42 a 64 du 
programme precedent: calcul de Y ( = YC+R * Cos(a)), recuperation 
de X dans DE et trace des quatre points. 

Le bloc suivant (lignes 55 a 61) represents le compteur, qui est un 
peu different de celui du programme precedent : 

Lignes 55 et 56 

Juste avant que ces deux lignes ne soient executees, I'etat de la pile 
est le suivant : 

• Au sommet se trouve I'adresse, dans le tableau, du cosinus de I'angle 
suivant. 

• En dessous se trouve la valeur 5. 

• Et encore en dessous I'adresse du retour au programme BASIC. 

La pile est remise en etat grace a ces deux lignes, cela dans 
I'eventualite d'un retour au BASIC si le compteur indique que le 
programme est termine. Dans le cas contraire, les deux valeurs qui se 
trouvaient sur la pile pourront toujours etre recuperees dans DE et BC. 

Ligne 57 

HL est pointe sur le placard de I'angle (qu'il est peut-etre abusif 
d'appeler "angle", puisqu'il ne nous sert que de compteur et non pas 
pour le calcul des sinus et cosinus). 
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Ligne 58 

Decrementation du contenu de I'emplacement memoire adresse par 
HL (done du compteur). 

Ligne 59 

Retour au BASIC si negatif (la boucle doit tourner 91 fois). 

Ligne 60 

Echange de HL et DE. Si la boucle n'est pas terminee, nous remettons 
dans HL I'adresse dans le tableau du cosinus de I'angle suivant. Cela 
6tant fait et BC etant correctement charge avec 5, nous pouvons 
effectuer un saut en debut de boucle. 

Ligne 61 

Saut relatif de —106 (ligne 12) : la boucle est boucl^e ! 

Lignes 62 a 70 

II s'agit du sous-programme deja etudie precedemment et charge de 
calculer -2(X-XC) ou -2(Y-YC). 






Lignes 71 a 73 

Sous-programme "Charger DE avec XC". 

Lignes 74 a 76 

Sous-programme "Charger DE avec YC". 

L'etude de ce programme se termine la. Voici un exemple de son 
utilisation : 

100 MODE0 : DEG. 

110 A = INT(RND x 640) : B = INT(RND x 400) : C = INT(RND 

X 110) : D = INT(RND x 16) 
120 AL = INT(RND X 2) : IF AL = THEN E = &F9 ELSE E = &ED 
130 POKE 42927, E : POKE 4291 0,E 
140 CALL 42800,A,B,C,D 
150 GOTO 110 

Enfin (une petite facetie) essayez ceci : 

100 MODE 1 : DEG 

1 10 POKE 42927, &F9 : CALL 42800,320.200,100.3 
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7. DEPLACEMENT D'UN MOBILE 
(4 DIRECTIONS) 



Ceux d'entre vous qui s'y sont deja essaye ont certainement pu se 
rendre compte des problemes que pose la realisation d'animations 
graphiques en BASIC. Dans beaucoup de cas, elles sont meme impossi- 
bles a realiser sans lenteurs excessives et phenomenes optiques 
desagreables, en particulier si le mobile couvre une surface d'ecran 
importante. 

Ce septieme progamme est done particulierement interessant puisqu'il 
permet le deplacement dans les quatre directions, avec une excellente 
qualite de mouvement, d'un objet couvrant une surface de 64 octets 
(pour comparaison, un caractere en mode 1 est defini sur 16 octets). 

Le programme peut facilement etre adapte pour un objet plus grand 
ou pour effectuer des deplacements dans d'autres directions (huit 
directions, par exemple). 

II est le plus long de tous ceux que presente cet ouvrage, et je vous 
conseillerai d'une part de proceder "lentement mais surement", et 
d'autre part de relire rapidement I'Annexe III traitant de la memoire 
ecran. 

II debute a I'adresse 43650, finit en 43897 (chiffre de verification : 
28800), n'est pas directement relogeable et son format d'appel est le 
suivant : 

CALL 43650.D 

Le parametre D determine la direction du mouvement : 



1 — haut 






2 - droite 




' 


3- bas 






4 — gauche 







- 

Ensuite, nous aurons besoin de deux placards de 2 octets chacun, pour 
y stacker deux valeurs que nous nommerons Y et Y1. Les adresses de 
ces placards sont respectivement 43898 (&AB7A) et 43900 (&AB7C). 

Le programme peut etre divise en neuf blocs dont les roles sont les 
suivants : 
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Blod 

(lignes 2 a 9): II realise les branchements a telle ou telle partie du 
programme en fonction du sens de deplacement. 

Bloc 2 
(lignes 10 a 26) : Deplacement vers le bas. 

Bloc 3 
(lignes 27 a 43) : Deplacement vers le haut. 

Bloc 4 
(lignes 44 a 68) : Deplacement vers la droite. 

Bloc 5 
(lignes 69 a 94) : Deplacement vers la gauche. 

Blocs 6, 7, 8, 9 

(respectivement lignes 95 a 105, 106 a 116, 117 a 126, 127 a 136): II 
s'agit la de quatre sous-programmes internes qui seront expliques plus 
loin. 



Voici le listing de ce programme : 






L1GNE 


ADRES5E DU lerCODE CODE-MACHINE 


MNEMONIQUE 




DE CETTE LIGNE 
DEC. HEXA. 




1 


43650 CD.19.BD 


CALL 48409 CjOIJ 


2 


43653 DD,46,0 


LD B,(IX+0) 


3 


43656 CB,50 


BIT 2,B 


4 


43658 


. ^_ on 7Q 


JRNZ.120 


tUj 'O 


5 


43660 


CB,48 


BIT 1,B 


6 


43662 




. op Oft 


JRZ.40 






7 


43664 




CB,40 


BIT 0,B 


8 


43666 






___ _^_ to n o 


JRNZ.2 




ZU,i 


9 


43668 






r— 18,45 

-, ? A 7fi ftp 


JR.68 


10 


43670 






LD HL, (43898) 




^ £t\ , (n,NC 


11 


43673 






11,50,0 


LD DE.80 


12 


43676 






E5 


PUSH HL 


13 


43677 






19 


ADD DE.HL 


14 


43678 






EB 


EX DE.HL 


15 


43679 






El 


POP HL 


16 


43680 






ED,53,7A,AB 


LD (43898), DE 


17 


43684 






22,7C,AB 


LD (43900), HL 


18 


43687 






CD,30,AB 


CALL 43824 


19 


43690 
43693 






1.AC37 


LD BC, 14252 


20 






9 


ADD HL.BC 


21 


43694 






EB 


EX DE.HL 


22 


43695 






9 


ADD HL.BC 


23 


43696 






EB 


EX DE.HL 


24 


43697 






CD,30,AB 


CALL 43824 


25 


43700 






CD,58,AB 


CALL 43864 J 
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26 


43 703 


1 1 C9 


KfcT 


27 


43704 




LD HL, (43900) 




28 


43707 




11,50,0 


LD DE.80 


29 


43710 




E5 


PUSH HL 


30 


43711 




ED, 52 


SBC HL.DE 


31 


43713 




EB 


EX DE.HL 


32 


43714 




El 


POP HL 


33 


43715 




ED,53,7C,AB 


LD (43900), DE 


36 


43719 




22.7A.AB 


LD (43898), HL 


35 


43722 




CD,30,AB 


CALL 4 3824 


36 


43725 




1,4C,38 


LD BC, 14412 


37 


43728 




9 


ADD HL.BC 


38 


43729 




EB 


EX DE.HL 


39 


43730 




9 


ADD HL.BC 


40 


43731 




EB 


EX DE.HL 


41 


43732 




CD,30,AB 


CALL 43824 


42 


43735 




CD, 58, AS 


CALL 43864 


43 


43738 




C9 


RET 


44 


43739 




-> 2A.7A.AB 


LD HL, (43898) 


45 


43742 


23 


INC HL 


46 


43743 


23 


INC HL 


47 


43744 


22.7A.AB 


LD (43898), HL 


48 


43747 


23 


INC HL 


49 


43748 


E5 


PUSH HL 


50 


43749 


Dl 


POP DE 


51 


43750 


13 


INC DE 


52 


43751 


13 


INC DE 


53 


43752 


CD,44,AB 


CALL 43844 


54 


43755 


E5 


PUSH HL 


55 


43756 


D5 


PUSH DE 


56 


43757 


C0,69,AB 


CALL 43881 


57 


43760 


01 


POP DE 


58 


43761 


El 


POP HL 


59 


43762 


1.B4.37 


LD BC, 14260 


60 


43765 


9 


ADD HL.BC 


61 


43766 


EB 


EX DE.HL 


62 


43767 


9 


ADD HL.BC 


63 


43768 


EB 


EXDE.HL 


64 


43769 


CD,44,AB 


CALL 43844 


65 


43772 


C0,69,AB 


CALL 43881 


66 


43775 


23 


INC HL 


67 


43776 


22,7C,AB 


LD (43900), HL 


68 
69 


43779 


C9 


RET 


43780 !■ 


» 2A,7A,AB 


LD HL, (43898) 


70 


43783 E5 


PUSH HL 


71 


43784 01 


POP DE 


72 


43785 IB 


DEC DE 


73 


43786 IB 


DEC DE 


74 


43787 ED,53,7A,AB 


LD (43898), DE 


75 


43791 CD,30,AB 


CALL 43824 


76 


43794 E5 


PUSH HL 


77 


43795 D5 


PUSH DE 


78 


43796 2B 


DEC HL 


79 


43797 2B 


DEC HL 


80 


43798 2B 


DEC HL 


81 


43799 CD,69,A8 


CALL 43881 


82 


43802 Dl 


POP DE 


83 


43802 El 


POP HL 


84 


43804 1.AC.37 


LD BC, 14252 


85 


43807 9 


AOD HL.BC 


86 


43808 EB 


EX DE.HL _ 
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87 
88 


43809 
43810 


9 
EB 


fl DP H L ,bC 
EX DE.HL 
LD (43900), DE 
CALL 43824 
EX DE.HL 


89 

90 


43811 
43815 


ED,53,7C,AB 
CD,30,AB 


91 


43818 


EB 


92 


43819 


2B 


DEC HL 


93 


43820 


CD,69,AB 


CALL 43881 


94 
95 


43823 

43824 BB30 


C9 


RET 


3E,8 


LU A, 8 


96 


43826 


I * i.4,0 


LD BC,4 


97 


43829 


ED, BO 


LDIR 


98 


43831 


3D 


DEC A 


99 


43832 


C8 


RET 2 


100 


43833 
43836 


1,4,8 


LD BC.2052 


101 


ED, 42 


SBC HL.BC 


102 


43838 


EB 


EX DE.HL 


103 


43839 


ED, 42 


SBC HL.BC 


104 


43841 


EB 


EX DE,HL 


105 
106 


43842 

43844 AB44 




JR -18 


lo. tL 


3E,8 


LD A, 8 


107 

108 


43846 
43849 




LD BC,4 
LDDR 


1 * 1 >4,U 

ED,B8 


109 


43851 


3D 


DEC A 


110 


43852 


C8 


RET Z 


111 


43853 
43856 


1,FC,7 


LD BC.2044 


112 


ED, 42 


SBC HL.BC 


113 


43858 


EB 


EX DE.HL 


114 


43859 


ED, 42 


SBC HL.BC 


115 


43861 


EB 


EX DE.HL 


11.6 


43862 




JR -18 


10,tt 


117 


43864 AB58 


11,4,8 


LD 0E.2052 


118 


43867 


3E,8 


LD A, 8 


119 


43869 


> 6 '\ 


LD B,4 
DEC HL 


120 


43871 


i-» 2B 


121 


43872 


36,0 


LD (HL),0 


122 


43874 


1 10, FB 


DJNZ -5 


123 


43876 


3D 


DEC A 


124 


43877 
43878 


CB 


RET Z 


125 


19 


ADD HL,DE 


126 
127 


43879 

43881 AB69 




JR -12 




11,FE,7 


LD DE.2046 


128 


43884 


3E,8 


LD A, 8 


129 


43886 


> 6,2 


LD B,2 


130 


43888 


|-3>23 


INC HL 


131 


43889 


36,0 


LD (HL),0 


132 


43891 


1 10, FB 


DJNZ -5 


133 


43893 


3D 


DEC A 


134 


43894 


C8 


RET Z 


135 


43895 


19 


ADO HL.DE 


136 


43896 


—^—^— l ft r /i 


JR -12 


lO,rO 



La ligne 1 se passe de commentaires puisqu'il s'agit de I'appel de 
la routine de synchronisation avec le rayon (deja etudiee). Nous 
commencerons done par le blocl, mais auparavant, lancez sur votre 
machine le petit programme suivant: 

10 FOR I = 1 TO 4 : PRINT l,BIN$(l,8) : PRINT : NEXT 
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1 




















1 























1 


1 

















1 





1 



Ce qui apparaTt sur I'ecran apres lancement est la representation en 
code binaire des nombres 1, 2, 3 et 4 : 

7 6 5 4 3 2 1 Numero du bit 

1 — 

2 — 

3 — 

4 — 

Rassurez-vous, il ne nous est pas indispensable de comprendre la 
theorie de I'arithm^tique binaire. II suffit de savoir que la representation 
en binaire d'un nombre compris entre et 255 s'effectue sur ce que 
Ton appelle des bits, numerates de a 7 en partant de la droite et qui 
n'ont que deux etats possibles : ou 1. 

Notons que si I'on se contente d'ecrire dans le programme "BIN$(I)" 
au lieu de "BIN$(l,8)" r la machine ne prend pas la peine de noter les 
situes a gauche du dernier 1 (BIN$(4) donnerait par exemple 101). C'est 
pourquoi nous ajoutons le 8 qui force la machine a ecrire les 8 bits. 

Pour determiner la valeur du parametre D, nous pouvons done 
raisonner comme suit : 

• Si le bit n°2 de D est a 1, c'est que D vaut 4, et le programme doit 
sauter au bloc "Deplacement vers la gauche". Dans le cas contraire : 

• Si le bit n°1 est mis a 0, il y a deux possibilites : D vaut 4 ou 1. Mais 
comme nous avons vu plus haut que D ne valait pas 4, D vaut done 
1 et le programme doit sauter au bloc "Deplacement vers le haut". 
Dans le cas contraire : 

• Si le bit de D est a 1, D peut valoir 1 ou 3. Nous avons vu 
prec6demment que D ne valait pas 1, D vaut done 3 et le programme 
doit sauter au bloc "Deplacement vers le bas". Dans le cas contraire : 

• Si D ne vaut ni 4, ni 3, ni 1, c'est que D vaut 2 et le programme doit 
sauter au bloc "Deplacement vers la droite". 

On peut remarquer que cette methode permet en meme temps une 
protection implicite puisqu'un des quatre sauts se fera obligatoirement, 
meme si le parametre D fourni est errone. 

Nous n'aurons pas a nous preoccuper de transformer D en binaire. 
Celui-ci est en effet le langage naturel de I'ordinateur, et il ne travaille 
qu'avec lui lorsque nous employons I'hexadecimal, c'est par simple 
commodity. La premiere chose que fait done I'ordinateur, c'est de 
traduire I'hexadecimal en binaire. 
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Pour tester les bits d'une valeur, nous utiliserons I'instruction "Te t 
le bit numero tant de tel registre". En I'occurrence, nous chargerons n 
dans le registre B. II faut enfin savoir que cette instruction met 
I'indicateur de si le bit teste vaut 0, et met I'indicateur de "non 0" si 
le bit teste vaut 1. 

Apres ces explications, les iignes 2 a 9 se passent presque de 
commentaires : 

Ligne 2 

Chargement de B avec le parametre D. 

Ligne 3 

Test du bit 2 de B. 

Ligne 4 

Saut de +120 (ligne 69 : deplacement gauche) si non nul. 

Ligne 5 
Test du bit 1 de B. 

Ligne 6 

Saut de +40 (ligne 27 : deplacement haut) si nul. 

Ligne 7 
Test du bit de B. 

Ligne 8 

Saut de +2 (ligne 10 : deplacement bas) si non nul. 

Ligne 9 

Saut de +68 (ligne 44 : deplacement droit). 






Nous allons maintenant etudier le bloc de Iignes 10 a 26 qui effectue 
le deplacement vers le bas. Pour suivre ies explications, r6ferez-vous 
systematiquement a la figure suivante. Sur cette figure, la position 
initiale du mobile, choisie arbitrairement, est indiquee par la zone 
hachuree. Les Iignes et colonnes indiquees (qui ne sont vraies que pour 
le mode 1), ainsi que les numeros d'octets correspondents, ne servent 
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que d'exemple et le raisonnement est valable quelle que soit la position 
initiale du mobile. D'autre part, et pour eviter la surcharge du dessin, 
seuls les premiers et huitieme traits de chaque ligne ont ete representes. 
Enfin, I'ensemble est divise en 16 blocs de 16 octets chacun, qui 
representent en fait I'intersection d'une ligne et d'une colonne ou, si 
Ton prefere, une position de caractere en model. 

2 3 4 5 



Ligne 1 



Ligne? 



o 



Ligne 3 



0. 



Ugno4 



6 











63492 63493 63494 63495 







m 



•'-'<?. v -t32:w ? t;;i:' 



eas-.-! 




49395 49396 49397 4939B 49399 



© 



■-V -■ 











63576 63577 



49320 49321 











_B* IraJt 

t al trait 



.8° trait 
I* trait 



.6° trait 
i" trait 



Notre mobile s'inscrivant initialement en VI, VII, IX et X, le deplacer 
vers le bas revient a effectuer les operations suivantes : 

1. Transferer X dans XIV 

2. Transferer XI dans XV 

3. Transferer VI dans X 

4. Transferer VII dans XI 

5. Effacer VI et VII 

Le sous-bloc constitue des lignes 10 a 18 realise les deux premieres 
operations. 

Nous nous contenterons d'admettre pour I'instant que, quelle que 
soit la position initiale du mobile, les valeurs Y et Y1 qui representent 
respectivement I'octet bas gauche (obg) du bloc haut gauche du mobile 
(VI pour le moment) et I'obg du bloc bas gauche du mobile nous sont 
connues et stockees dans leurs placards. 
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Ligne 10 

Y1 est charge dans HL. 
Ligne 11 

80 est charge dans DE. 

Ligne 12 

Sauvegarde de Y1 . 

Ligne 13 

Addition de HL et DE. Le resultat se retrouve dans HL. 

Ligne 14 

Echange de HL et DE. Ce dernier est done maintenant charge avec 
Y1+80. Rappelons (voir Annexe III) que pour passer d'un octet d'une 
ligne a I'octet de meme situation mais une ligne plus bas, il suffit 
d'ajouter 80 au premier. Puisque DE est charge avec Y1+80, il est 
done pointe sur I'obg de XIV (63732 sur la figure). 

Ligne 15 

- 

Y1 est remis dans HL. 



Ligne 16 






Ou 'Tart d'etre prevoyant" ; quand le mobile aura ete deplace d'une 
ligne vers le bas, a la fin du programme, Y et Y1 devront egalement 
etre descendus d'une ligne pour suivre le mouvement. Sur notre exemple, 

Y vaudra 63652 et Y1 vaudra 63732. Or cette derniere valeur est 
actuellement dans DE. Au passage, nous en profitons done pour charger 
Y1 dans le placard. 

Ligne 17 

Meme chose, mais pour la future valeur de Y qui se trouve 
actuellement chargee dans HL. Remarquons que cette future valeur de 

Y est egale a la valeur actuelle de Y1. 

Ligne 18 

Appel du sous-programme interne d'adresse 43824 (ligne 95). Voyons 
ce sous-programme ; 

_ 8T _ 



Lignes 95 et 96 

Chargement de 8 dans A et de 4 dans BC. Ce sont la deux compteurs 
qui vont nous servir pour le transfert (pour transferer X et XI dans XIV 
et XV), il faut en effet transferer les huit traits de 4 octets chacun qui 
les composent. 

Ligne 97 

Transfert repetitif avec incrementation (cette instruction a deja ete 
etudiee plusieurs fois). 

A la fin de cette operation, HL se retrouve pointe sur I'obg de XII 
(63656 sur I'exemple), et DE sur I'obg de XVI (63736). En outre, le 
huitieme trait de X et XI a ete recopie (ou transfere) sur le huitieme 
trait de XIV et XV. Nous pouvons maintenant effectuer la meme 
operation avec le septieme trait (qui n'est pas represents sur I'exemple). 

Lignes 98 et 99 

Decrementation de A, puis retour de sous-programme si nul. Avant 
de passer au septieme trait, nous verifions, grace au compteur, combien 
de traits ont deja ete transferes. Si les huit I'ont ete, le retour en ligne 
19 est effectue, sinon le sous-programme continue en sequence. 

Pour transferer le trait suivant, nous devons au prealable pointer HL 
sur I'octet situe immediatement au-dessus de I'obg de X. II n'est pas 
represents, mais son adresse est 63652-2048 = 61604 (la encore, voir 
I'Annexe III). De meme, DE doit etre pointe sur I'octet immediatement 
au-dessus de I'obg de XIV ( = 63732-2048 = 61684). On se rend compte 
que cela est possible en enlevant 2052 a la valeur actuelle de HL et DE 
(63656-2052 = 61604 et 63736-2052 = 61684). 
C'est ce que vont faire les cinq lignes qui suivent: 

Ligne 101 

BC est soustrait de HL (le resultat est dans HL et BC reste inchange). 



Ligne 100 

Chargement de 2052 dans BC. 



Ligne 102 

Echangede HL et DE. 






-84- 



Ligne 103 

BC est soustrait de HL. 

Ligne 104 

Echange de HL et DE qui sont done maintenant correctement pointes 
au debut du septieme trait de X et XIV. 

Ligne 105 

Saut relatif de -18 (ligne 96). La, le compteur de transfert nSpetitif 
est a nouveau charge avec 4, puis le transfert a lieu, A est decrements, 
et ainsi de suite. Apres huit tours de boucle, au terme desquels les huit 
traits de X et XI auront ete transferes, le retour de sous-programme 
sera effectue (en ligne 19). 

A ce moment-la, HL et DE seront respectivement pointes sur I'octet 
haut gauche (ohg) de XII et XVI (49320 et 49400). Or nous voulons 
maintenant transfert" VI et VII en X et XI. Pour cela, nous allons 
proceder exactement de la meme maniere que precedemment, et il 
nous faut done pointer HL et DE respectivement sur I'obg de VI (63572) 
et sur I'obg de X (63652). Cela est possible en ajoutant 14252 a ces 
deux registres (49320 + 14252 = 63572 et 49400 + 14252 = 63652). C'est ce 
que font |es lignes 19 a 23 : 14252 dans BC, HL+DE, echange de HL et 
DE, HL + DE, echange de HL et DE. 

Ligne 24 

Appel du meme sous-programme interne que precedemment Au 
retour de ce sous-programme, VI et VII auront ete transferes dans X et 
XI, HL sera points sur 49240 et DE sur 49320. II reste a effacer VI et 
VII. 

Ligne 25 

Le sous-programme interne d'adresse 43864 qui est appelS ici va se 
charger de cet effacement. 

Ligne 117 

Chargement de DE avec 2052. Nous verrons pourquoi plus loin. 

Lignes 118 et 119 

Chargement de 8 dans A et de 4 dans B. lis serviront de compteurs : 
il y a huit traits de 4 octets chacun a effacer. 
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Ligne 120 

Decrementation de HL. Comme ce dernier etait pointe sur 49240, il 
I'est maintenant sur 49239. 

Ligne 121 

La valeur est chargee dans I'emplacement memoire adresse par HL 
(ou si I'on veut, I'emplacement 49239 de la memoire ecran est mis a 0, 
done efface^. 

Ligne 122 

Decrementation de B et saut de -5 (ligne 120) si non nul. Les 
lignes 120 et 121 vont done etre executees quatre fois, HL pointant 
successivement sur 49239, 49238, 49237 et 49236 et les effagant. Cela 
fait, B vaudra et le sous-programme se poursuivra en sequence. 

Lignes 123 et 124 

Decrementation de A et retour si nul. Nous verifions le nombre de 
traits effaces. Si les huit ne I'ont pas ete, le sous-programme se poursuit. 

Nous voulons maintenant effacer le trait suivant, e'est-a-dire pour 
['instant le trait n° 7. Pour cela, et pour pouvoir utiliser le meme 
processus que pour le huitieme, nous devons pointer HL sur I'octet 
situe en dessous de 49240 ( = 49240 + 2048=51288). Or HL est actuelle- 
ment charg^ avec 49236. II suffit done de lui ajouter 2052, e'est-a-dire 
la valeur que nous avions mise dans DE a la ligne 117, et qui y est 
toujours. 

Ligne 125 

Addition de HL et DE (le resultat est dans HL et DE reste inchang6). 
HL est maintenant correctement pointe. 

Ligne 126 

Saut relatif de —12 (ligne 119). Ainsi la boucle va tourner tant que 
les huit traits de VI et VII n'auront pas ete effaces. 
Cette ligne est la derniere du sous-programme d'effagage. 
Le retour se fait en ligne 26. 

Ligne 26 

Le bloc "Deplacement vers le bas" etant termine, retour au BASIC. 
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Le bloc "Deplacement vers le haut", qui va des lignes 27 a 43, 
effectue les operations suivantes : 

1. Transferer VI et VII dans II et III. 

2. Transferer X et XI dans VI et VII. 

3. Effacer X et XI. 

Sans etre tout a fait identique, il suit la m§me demarche que le bloc 
precedent, et vous ne devriez pas avoir de difficulty a I'etudier seul, 
pour peu que vous y alliez lentement et en prenant le temps de 
reflechir. 

Nous nous contenterons done de donner la traduction en clair de 
chaque ligne : 

Ligne 27 Y est charge dans HL. 

Ligne 28 80 est charge dans DE. 

Ligne 29 Empilement de Y. 

Ligne 30 HL moins DE. 

Ligne 31 Echange de HL et DE. 

Ligne 32 Empilement de HL. 

Ligne 33 Chargement de I'emplacement memoire 43900 avec DE. 

Ligne 34 Chargement de I'emplacement memoire 43898 avec HL. 

Ligne 35 Appel du sous-programme d'adresse 43824. 

Ligne 36 Chargement de BC avec 14412. 

Ligne 37 HL plus BC. 

Ligne 38 Echange de HL et DE. 

Ligne 39 HL plus BC. 

Ligne 40 Echange de HL et DE. 

Ligne 41 Appel du sous-programme d'adresse 43824. 

Ligne 42 Appel du sous-programme d'adresse 43864. 

Ligne 43 Retour de sous-programme. 

Passons maintenant au bloc "Deplacement vers la droite" (lignes 44 
a 68). 
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L'ordre des operations qu'il convient de faire, indique ci-dessous, est 
un peu different de celui des blocs precedents : 

1. Transferer X et XI dans XI et XII. 

2. EffacerX. 

3. Transferer VI et VII dans VII et VIII. 

4. Effacer VI. 

Les lignes 44 a 56 r^alisent les deux premieres operations : 

Ligne 44 

HL est pointe sur Y1. 

Lignes 45 et 46 

Deux incrementations successives qui ont pour effet de pointer HL 
sur I'obg de XI (63654 sur notre exemple). 

Ligne 47 

Rangement de la future valeur de Y1 dans son placard. 

Ligne 48 

Pointage de HL sur I'obd (octet bas droit) de XI (63655 sur notre 
exemple). 

Lignes 49 et 50 

Une maniere rapide de charger DE avec la meme valeur que HL. lis 
sont maintenant tous deux pointed sur I'obd de XI. 

Lignes 51 et 52 

DE est pointe sur I'obd de XII. 

Ligne 53 

Appel du sous-programme interne d'adresse 43844 (&AB44). Voyons 
ce sous-programme : 

Lignes 106 et 107 

Chargement de 8 dans A, puis de 4 dans BC. Vous avez compris qu'il 
s'agit la de I'initialisation des compteurs (pour transferer les blocs X et 
XI, il faut transferer les huit traits de 4 octets chacun qui les composent). 
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Ligne 108 

Transfert rep^titif avec decrementation Apres I'execution de cette 
ligne, le trait conceme a ete decale de deux positions vers la droite. 
Sur notre exemple, et apres le premier tour de boucle concernant le 
huitieme trait, HL se retrouve pointe sur 63651 et DE sur 63653. 

II faut maintenant transferer le trait suivant, situ6 juste au-dessus de 
celui-la, apres avoir verifie, grace aux lignes 109 (decrementation de A) 
et 110 (retour si nul), que les huit traits n'ont pas ete transferee 

Vous a'vez sans doute d6ja compris le processus : le pointage de HL et 
DE pour le transfert du trait suivant s'obtient en enlevant 2044 a HL et DE : 
63653-2044 = 61609 (juste au-dessus de 63657), et 63651-2044 = 61607 
(juste au-dessus de 63655). 

Cette soustraction est effectuee par les lignes 111 a 115. Puis le saut 
relatif de la ligne 116 renvoie ensuite en debut de boucle. La, le 
compteur de transfert est reinitialise, puis le trait est transfere, le 
compteur general d£cr£mente, etc. 

Lorsque les huit traits sont transferes, le retour de sous-programme 
est effectu<§ et I'on revient a la ligne 54. A ce moment precis, HL est 
pointe sur I'ohd (octet haut droit) de IX (49315 sur notre exemple), et 
DE sur I'ohd de X (49317 sur I'exemple). 

Lignes 54 et 55 

Nous aurons besoin ulterieurement des valeurs contenues dans HL et 
DE, et nous les sauvegardons par empilement. 

Ligne 56 

Appel du sous-programme interne d'adresse 43881 (&AB69), ligne 127. 
C'est lui qui va se charger de I'effagage du bloc X. 

Ligne 127 

Chargement de DE avec 2046. Nous verrons pourquoi plus loin. 

Lignes 128 et 129 

Chargement de 8 dans A et de 4 dans B : les compteurs sont initialises 
(il y aura huit traits de 2 octets chacun a effacer). 

Ligne 130 

Incrementation de HL. Rappelons que ce dernier etait toujours pointe 
sur I'ohd de IX. II Test maintenant sur I'ohg de X (49236 sur I'exemple). 

- 89 - 



Ligne 131 






Chargement de dans I'emplacement memoire adresse par HL ou, si 
Ton veut, effacement de cet emplacement. 

Ligne 132 

Decrementation de B et saut relatif de —5 (en ligne 129) si non nul. 
Les lignes 129 et 130 vont done etre executees deux fois, HL pointant 
d'abord sur I'ohg puis I'ohd de X (49316 et 49317 sur notre exemple). 
Lorsque cela est termine, done lorsque le premier trait est efface, le 
sous-programme continue en sequence. 

Lignes 133 et 134 

Decrementation de A et retour si nul. Le nombre de traits deja 
effaces est verifie. Si les huit I'ont ete, le retour est effectue (en ligne 
57), sinon le sous-programme continue en sequence. 

Ligne 135 

Pour effacer le trait suivant, HL doit etre pointe comme precedem- 
ment, mais un trait plus bas. II suffit pour cela d'ajouter 2046 a sa 
valeur actuelle (49317 + 2046 = 51363). Or DE avait justement ete 
charge avec 2046 en ligne 127, et il Test toujours. II suffit done d'ajouter 
DE et HL, comme le fait cette ligne (rappelons que le resultat se 
retrouve dans HL et que DE reste inchange). 

Ligne 136 

Saut relatif de —12 (en ligne 129). La, le compteur B est reinitialise, 
HL est increments, I'emplacement qu'il adresse efface, etc. 

Lorsque ce sous-programme a termine sa tache et que X est efface, 
le retour se fait en ligne 57. II nous faut maintenant transferer VI et 
VII dans VII et VIII, puis effacer VI. 

Lignes 57 et 58 

Depilement des registres DE puis HL qui se retrouvent done respective- 
ment pointes sur I'ohd de X et I'ohd de IX. Mais ce que nous voulons 
obtenir, e'est leur pointage sur I'obd de VIII et I'obd de VII. On 
atteint ce resultat en leur ajoutant 14260 (49317 + 14260 = 63577 et 
49315 + 14260 = 63575). Cette operation est realised par les lignes 59 a 
63. Leur principe vous est maintenant familier, et nous n'y reviendrons 
pas. 



- 90 - 



La ligne 64 appelle ensuite le sous-programme d'adresse 43844, deja 
etudie, et qui realise le transfert. La ligne 65 appelle le sous-programme 
d'adresse 43881 qui efface le bloc VI. 

Au retour de ce dernier sous-programme, HL se retrouve pointe sur 
I'obd de VI. 

Ligne 66 

Incrementation de HL qui contient done maintenant I'adresse de 
I'obg de VII, e'est-a-dire la valeur de Y apres le deplacement du mobile. 

Ligne 67 

Cette valeur est rangee dans son placard. 

Ligne 68 

Le deplacement vers la droite etant termine, le retour au BASIC est 
effectue. 

Reste le bloc "Deplacement vers la gauche", qui va des lignes 69 a 
94. II s'effectue d'une maniere comparable au deplacement vers la 
droite, et cela constituera un excellent exercice pour vous de I'etudier 
seul. 

Avant d'en avoir tout a fait termini, il nous faut encore elucider 
I'enigme des adresses Y et Y1. 

Nous avons considere jusqu'a present que ces valeurs 6taient connues 
et, qui plus est, rangees dans leurs placards au moment de I'appel du 
programme. 

II est bien evident qu'elles n'y viennent pas toutes seules, et 
qu'il faudra les charger avant de pouvoir utiliser le programme de 
deplacement. 

Regardez a nouveau la figure : le mobile est situe au depart sur 
quatre emplacements dont les coordonnees sont (3,2), (4,2), (3,3) et (4,3). 
Or, I'adresse de I'obg d'un emplacement donne peut fort bien etre 
calculee en fonction des coordonnees de cet emplacement : 

obg d'un emplacement 
= 63406 + (80 X n° de ligne) + (2 X n° de colonne) 

Soit, dans notre cas : 

Y = 63406 + (80 * 2) + (3 * 2) = 63572 
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et 

Y1 = 63406 + (80 * 3) + (3 * 2) = 63652 

Une fois ces adresses calculees, rien n'est plus facile que de les 
ranger dans leurs placards. Convertissons-les d'abord en hexadecimal : 

HEX$(63572) = F854 
HEX$(63652) = F8A4 

Rappelons que, lorsque I'on range un nombre en memoire, I'octet 
faible est toujours range" en premier. Voici done la ligne BASIC qui 
range Y et Y1 : 

POKE 43898.&A4 : POKE 43899,&F8 : POKE 43900,&54 : 
POKE 43901, &F8 

II n'est necessaire d'executer cette ligne qu'une seule fois avant de 
pouvoir faire appel au programme de deplacement, puisque Y et Y1 
sont sauvegard^s au fur et a mesure que le mobile se deplace. 

Bien entendu, la formule proposee plus haut est valable, en model, 
quelque soit I'endroit initial ou vous souhaitez positionner le mobile. 

Ce programme n'a maintenant plus de secrets pour vous et, fideles a 
la coutume, nous vous proposons ci-dessous deux exemples de son 
utilisation : 

100 POKE 43898,&A4 : POKE 43899, &F8 : 

POKE 43900.&54 : POKE 43901, &F8 
110 MODE 1 : BORDER 3 
120 FOR l = 3 TO 4 : FOR J = 2 TO 3 : LOCATE l,J : PRINT 

CHR${206) : NEXT J,l 
130 A = 3: B = 2 
140 IF INKEY(0) = THEN IF B-1=0 THEN 140 ELSE CALL 

43650.1 : B = B-1 

1 50 IF INKEY(2) = THEN IF B + 1 = 25 THEN 1 40 ELSE CALL 

43650.3 : B = B+1 

160 IF INKEY(8) = THEN IF A-1=0 THEN 140 ELSE CALL 

43650.4 : A = A-1 

170 IFINKEY(1) = 0THEN IF A+ 1=40 THEN 140 ELSE CALL 

43650.2 : A = A+1 

180 GOTO 140 

■ 
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La ligne 100 range les adresses Y et Y1 ; la ligne 12o h 
mobile; les lignes 130 a 180 permettent de deplacer | e rnobil 
utilisant les fleches du curseur (notons qu'une protection a etc. 

~ i i i-ii i a- ■ 'nstallee 

pour empecher le mobile de sortir de I ecran, ce qui pourrait prov 

des resultats facheux. Cette protection pourrait fort bien etre install' 
directement dans le programme en langage machine. Si le cceur vou 
en dit...). 

Enfin, pour les fanatiques d'asteroTdes, vaisseaux spatiaux et autres 
fusees, voici une modeste tentative graphique (la ligne 1 20 est remplacee 
et deux autres sont inserees) : 

120 FOR 1 = 49237 TO 63573 STEP 2048 : READ A : POKE 

l,A : READ A : POKE I + 1 ,A : NEXT I 
122 FOR 1 = 49316 TO 63652 STEP 2048 : FOR J = TO 3 : 

READ A : POKE l + J,A : NEXT J,l 
124 DATA 17, 136, 17, 136, 17, 136, 51, 204, 48, 192, 
119, 238, 48, 192, 48, 192, 0, 7, 14, 0, 0, 55, 
206, 0, 1, 63, 207, 8, 3, 63, 207, 12, 3, 95, 
110, 12, 2, 102, 102, 4, 2, 96, 96, 4, 2, 96, 
96,4 

Ce dernier exemple a surtout pour objet de vous montrer que le 
programme n'est pas tributaire de I'instruction LOCATE et que, en ce 
sens, le mode est indifferent. 









' 
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8. EXEMPLE 8: TRI DE DONNEES 
ALPHANUMERIQUES 



Notre approche du langage machine serait incomplete si elle ne 
comprenait pas une petite incursion dans le royaume des donnees 
alphanumeriques. (L'etude prealable de I'Annexe V, section 2, est impera- 
tive.) 

Le programme que nous vous proposons maintenant permet de ranger 
un tableau de donnees alphanumeriques dans I'ordre alphabetique. II 
debute a I'adresse 43830, finit en 43896 (chiffre de verification : 7168), 
n'est pas directement relogeable, et son format d'appel est le suivant : 

CALL 43830, @ X$(0) 

X$ est le nom du tableau (qui peut etre quelconque), et I'ensemble @ 
X$(0) pointe done sur I'adresse du descripteur de chame de la premiere 
donnee du tableau (son rang est 0). 

II est indispensable que nous nous arretions un moment sur cette 
notion de tableau et, pour §tre plus precis, sur Porganisation en memoire 
des descripteurs de chame des elements qui le composent. 
Pour n'importe quel tableau X$ (a une seule dimension), ces descripteurs 
de chame sont stockes de la maniere suivante : 



Nombre d'elements ) 


Octet faible 


I 


du tableau X$ j 


Octet fort 


II 


[ 


Longueur de 
X$(0) 


II 


Descripteur de i 
chame du 1 er / 


Adresse de X$(0) 
(octet faible) 


l\ 


element du tableau J 


Adresse de X$(0) 
(octet fort) 


V 
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Descripteur de 
chaTne du 2 e 
element du tableau 






Longueur de 
X$(1) 



AdressedeX$(1) 
(octet faible) 



Adresse de X$(1) 
(octet fort) 



VI 



VII 



VIII 



etc. 



Les chiffres romains indiques sur la droite ne nous serviront qu'a 
nommer les emplacements memoire correspondants lors des explica- 
tions. 

Rappelons que I'appel du programme se faisant sous le format : 

CALL 43830, @ X$(0) 
Le registre IX sera pointe comme suit : 



Adresse de III 



Adresse du descripteur 

de chaTne de X$(0) 

(octet faible) 



Adresse du descripteur 

de chaTne de X$(0) 

(octet fort) 



case memoire IX + 



case memoire IX + 1 



II sera necessaire, tout au long des explications, de vous reporter a 
ces deux figures. 

Voyons maintenant le principe de tri adopte. II s'agit de la technique 
dite du tri par bulles, dont le processus est tres simple : notre tableau 
etant constitue d'une serie de chaTnes de caracteres, on pointe sur 
I'une d'elles, et Ton compare le code ASCII (voir a ce sujet la page 
A3.1 du guide de I'utilisateur) de sa premiere lettre au code ASCII de 
la premiere lettre de la chaTne de caracteres suivante. 

Le code ASCII le plus petit indique que la lettre correspondante est 
situee avant dans I'alphabet, et les deux chaTnes de caracteres sont ou 
ne sont pas inversees, selon le cas. 

Si une inversion est necessaire, elle est effectuee, puis le pointeur 
est repositionne au debut du tableau et le processus est repris. 

Si le pointeur arrive en fin de tableau sans qu'aucune inversion ait 



— Vf. — 



ete necessaire, c'est done qu'il n'y a plus d'element a inverser et que 
Ie tableau est range. 

Le nom de tri par bulles s'explique par une analogie ; a chaque passe 
du pointeur, les elements les plus "legers" remontent progressivement 
a la surface. 

Pour ce qui nous concerne, precisons que, lorsqu'il sera necessaire 
d'inverser deux donnees du tableau, nous nous contenterons en fait 
d'inverser leur descripteurs de chame respectifs. 

Si tout cela est bien clair, nous pouvons passer a I'etude du listing. 



LIGNE 


ADRE55E DU lei CODE CODE-MACHINE 
DE CETTE LIGNE 

DEC. HEXA. 


MNEM0NIQUE 






UD H,(IXtl) 
LD L, (1X4-0) 


1 
2 


43833 


DD,6E,0 


3 


43836 


2B 


DEC HL 


4 


43837 


46 


LD B,(HL) 


5 


43838 


2B 


OEC HL 


6 


43839 


4E 


LD C,(HL) 


7 


43840 


B 


DEC BC 


8 


43841 




C5 


PUSH BC 


9 


43842 


23 


INC HL 


10 


43843 


23 


INC HL 


11 


43844 


23 


INC HL 


12 


43845 




r* 5E 


LD E, (HL) 


13 


43846 




23 


INC HL 


14 
15 


/i^A/i 7 




56 


LD D,(HL) 
INC HL 


43848 




23 


16 


43849 




23 


INC HL 


17 


43850 




4E 


LD C,(HL) 


18 


43851 




23 


INC HL 


19 


43852 




46 


LD B,(HL) 


20 


43853 




A 


LD A,(BC) 


21 


43854 
43855 




EB 


EX HL.DE 


22 




BE 


CP (HL) 


23 

24 


43856 
43859 






— Ffl sn AR 


JP M, 43869 






r n . ju i md 




El 


PDP HL 


25 


43860 






2B 


DEC HL 


26 


43861 






7C 


LD A,H 


27 


43862 






B5 


OR L 


28 


43863 






C8 


RET Z 


29 


43864 






E5 


PUSH HL 


30 


43865 






IB 


DEC DE 


31 


43866 






EB 


EX HL.DE 


32 


43867 






— 18, £8 


JR -24 


33 


43869 AB5D 




»E1 


POP HL 


34 


43870 


D5 


PUSH DE 


35 


43871 


El 


POP HL 


36 


43872 


1A 


LD A,(DE) 


37 


43873 


F5 


PUSH AF 


38 


43874 


IB 


DEC DE 


39 


43875 


1A 


LD A,(DE) 


40 


43876 


F5 


PUSH AF 


41 


43877 


IB 


OEC DE 


42 


43878 


1A 


LD A,(DE) 






■ 
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43 


43879 


44 


43880 


45 


43881 


46 


43884 


47 


43886 


48 


43887 


49 


43888 


50 


43889 


51 


43890 


52 


43891 


53 


43892 


54 


43893 


55 


43894 


56 


43895 



EB 


EX HL.DE 


2B 


DEC HL 


1,3,0 


LD BC,3 


ED,B8 


LODR 


EB 


EX HL,DE 


13 


INC DE 


12 


LD (DE),A 


Fl 


POP AF 


13 


INC DE 


12 


LD (DE),A 


Fl 


POP AF 


13 


INC DE 


12 


LD (DE),A 


' 18, BD 


JR -67 



Le premier bloc remarquable va des lignes 1 a 8, et initialise le 
compteur. Nous aurons en effet besoin d'etre avertis si tout le tableau 
est parcouru sans qu'il y ait d'inversion, signe que le programme est 
termine. En realite, il suffira d'atteindre I'avant-dernier element du 
tableau, puisqu'il aura alors ete compare au suivant, c'est-a-dire au 
dernier. La valeur qui va nous interesser est done : 

(nombre d'elements du tableau) — 1 
Lignes 1 et 2 

Chargement de HL avec (IX + 0) et (IX + 1). Le registre HL est ainsi 
pointe sur III (voir la figure). 

Ligne 3 

Decrementation de HL qui est maintenant pointe sur II (gardez bien 
a I'esprit les pointages successifs de HL). 

Ligne 4 

Chargement du contenu de ('emplacement memoire sur lequel est 
pointe HL dans le registre B. Ce dernier contient done maintenant 
I'octet fort du nombre d'elements du tableau. 

Lignes 5 et 6 

Meme principe pour charger I'octet faible dans C. Apres cette ligne, 
BC contient le nombre d'elements du tableau. 

Lignes 7 et 8 

Decrementation de BC (puisque nous voulons obtenir la valeur 
(nombre d'elements —1)), puis sauvegarde par empilement. 
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Le deuxieme bloc va des lignes 9 a 23 et effectue les taches suivantes : 
initialisation des pointeurs, demarrage des passes, comparaison des 
elements et branchement en fonction du resultat : 

Lignes 9, 10 et 11 

Trois incrementations successives de HL qui se retrouve pointe sur 
IV. 

Lignes 12, 13 et 14 

Suivant un principe analogue a celui des lignes 4, 5 et 6, I'adresse du 
premier Element du tableau est chargee dans DE. 

Lignes 15 a 19 

Toujours selon le meme principe, I'adresse de I'6l6ment suivant du 
tableau est charge dans BC. 

Recapitulons la situation : 

• DE est pointe sur I'emplacement memoire contenant le code ASCII 
de la premiere lettre du premier element du tableau. 

• BC est pointe sur I'emplacement memoire contenant le code ASCII 
de la premiere lettre du deuxieme element du tableau. 

• HL est pointe sur VIII. 

• Le nombre d'el£ments du tableau - 1 est sur la pile. 

Ligne 20 

Le contenu de I'emplacement memoire adresse par BC est charge 
dans A, qui contient done maintenant le code ASCII de la premiere 
lettre du deuxieme element du tableau. 

Ligne 21 

Echange de DE et HL. Ce dernier se retrouve pointe sur I'emplacement 
memoire contenant le code ASCII de la premiere lettre du premier 
element du tableau, et DE se retrouve pointe sur VIII. 

Ligne 22 

Comparaison entre A et (HL), done entre les deux codes ASCII. 
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Rappelons brievement le principe de cette comparaison (qui a deja <§te 
etudiee dans d'autres programmes). 

(HL) est soustrait de A, sans que le resultat soit conserve, c'est-a-dire 
sans que le contenu des deux registres soit modifie. Les indicateurs S 
et Z sont mis en fonction du resultat. 

En I'occurrence, si le code ASCII du premier element est plus petit 
que celui du deuxieme element (done si la situation alphabetique des 
deux elements I'un par rapport a I'autre est correcte), I'indicateur S 
indiquera un resultat positif. 

Dans le cas contraire, S indiquera un resultat negatif et nous devrons 
inverser les descripteurs de chame des 2 elements. 

Ligne 23 

Saut a I'adresse 43869 (ligne 33) si negatif. A cette adresse commence 
en effet le bloc charge de I'inversion. Voyons d'abord le cas ou cette 
inversion n'est pas necessaire et ou le saut est ignore : 

Ligne 24 

L'etat actuel du compteur est recupere et charge dans HL. 

Lignes 25, 26 et 27 

Apres une decrementation de HL, on verifie si son contenu est ou 
n'est pas egal a (selon un principe deja etudie dans le programme de 
pause, lignes 6, 7 et 8). 

Ligne 28 

Retour de sous-programme si nul : si HL = 0, done si le tableau a 
6te parcouru jusqu'a I'avant-dernier element sans qu'il y ait eu besoin 
d'inversion, le tableau est rang6 correctement, et le programme est 
terming. Sinon, cette instruction est ignoree. 

Ligne 29 

Sauvegarde de la nouvelle valeur du compteur. 
Ligne 30 

Decrementation de DE qui, depuis la ligne 21, <§tait pointe sur VIII 
et I'est maintenant sur VII. 

Ligne 31 

Echange de HL et DE : HL est pointe" sur VII. 
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Ligne 32 

Saut relatif de - 24 en ligne 12. La boucle va done reprendre, mais 
le pointage dans Ie tableau sera decale d'un element (au premier tour, 
la comparaison se fera entre les elements 1 et 2, au deuxieme tour 
entre les elements 2 et 3. au quatrieme tour entre les elements 3 et 4, 

etc.). 

Si cette boucle est executee (nombre d'elements - 1) fois sans 
inversion, le programme retournera au BASIC en ligne 28. Mais attention : 
a chaque inversion, le processus doit reprendre depuis le debut, et le 
compteur devra etre en particulier reinitialise. 

Nous allons maintenant passer au bloc de lignes 33 a 56, qui se 
charge des eventuelles inversions des descripteurs de chame. 

Pour servir d'exemple, nous prendrons le cas ou les descripteurs de 
chame des deux premiers elements du tableau doivent §tre inverses. 
Pour ce faire, il faut executer les taches suivantes : 

1. Sauvegarder les contenus de VI, VII et VIM. 

2. Transferer les contenus de III, IV et V respectivement dans VI, VII 
et VIII. 

3. Mettre les valeurs sauvegardees (contenus de VI, VII et VIII), 
respectivement dans III, IV et V. 

Rappelons qu'au moment ou le branchement vers ce bloc se fait, en 
ligne 23, DE etait pointe sur VIM. 

Ligne 33 

La valeur actuelle du compteur ne nous interesse plus, puisque celui- 
ci devra etre reinitialise. C'est pourquoi nous I'enlevons de la pile. 

Lignes 34 et 35 

HL est, comme DE, pointe sur VIII. 

Lignes 36 a 42 

Elles realisent la sauvegarde des contenus de VI, VII et VIM. Ces 
lignes ne necessitent aucune explication particuliere : vous connaissez 
toutes les instructions utilisees, et il suffit de suivre attentivement, si 
possible en les notant, I'etat de la pile et devolution du contenu des 
registres. 
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Une remarque cependant: vous pourrez constater q ue sont i 
les deux instructions suivantes : "PUSH AF" et "POP AF" q' es 
n'avez jamais encore entendu parler de ce registre double AF^F 5 
realite, seul le contenu de A nous interesse, et pas du tout celui d f" 
Mais comme il est impossible d'empiler un registre simple, nous som 
obliges d'empiler le registre double AF, en nous disant que A I'est pa 
la meme occasion. 

Quand vous rencontrerez ces deux instructions, vous pourrez faire 
comme s'il y avait "PUSH A" et "POP A" a la place. 

Lignes 43 a 46 

Comme precedemment, ce bloc, qui realise le transfert des contenus 
de V, IV et III dans VIII et V, s'explique de lui-meme. L'instruction de 
transfert repetitif avec decrementation, deja plusieurs fois etudiee, est 
en particulier utilisee. 

Signalons egalement qu'apres I'execution de ces lignes, DE est pointe 
sur V et HL sur II. 

Lignes 47 a 55 

La encore, rien de particuier. Ce bloc realise evidemment le transfert 
des contenus initiaux de VIII, VII et VI dans V, IV et III. L'inversion des 
deux descripteurs de chame est terminee. 

Ligne 56 

Puisqu'une inversion a eu lieu, tout le processus doit etre repris : 
saut relatif de — 67, en ligne 1. 

Voici un exemple d'utilisation de ce programme : 

100 DIM TABLEAU $ (24) 

110CLS : FORI = 0TO24: A = INT(RND * 26) + 65 : 

TABLEAU$(I) = CHR$(A) : NEXT 
120 FOR l = TO 24 : PRINT TABLEAU$(I) : NEXT 
130 CALL 43830, @TABLEAU$(0) 
140 FOR l = TO 24: LOCATE 20,1 + 1 : PRINT TABLEAU$(I) : 

NEXT 
1 50 GOTO 1 50 

La ligne 100 cree un tableau de 25 elements. 

La ligne 110 remplit aleatoirement ce tableau avec les lettres 

de I'alphabet (majuscules). 
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La ligne 1 20 affiche sur la gauche de I'ecran le contenu initial' 

du tableau. 

La ligne 1 30 effectue le rangement. 

La ligne 140 affiche, a droite de I'ecran, le contenu du tableau 

apres ce rangement. 

La ligne 150 empeche le scrolling d'ecran (il faut arreter le 

programme en tapant 2 fois la touche "ESC"). 

Remarque 

Le tableau n'est ici constitue que de lettres isolees, mais il pourrait 
tout aussi bien etre constitue de mots. 

A titre de comparaison, le programme en langage machine range le 
tableau en plus ou moins 1/10 e de seconde, alors qu'il faudrait jusqu'a 
200 fois plus de temps a un programme BASIC equivalent ! 
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IV 



ANNEXES 



1. LES SAUTS RELATIFS 



II est possible, dans un programme en langage machine, d'executer 
ce que I'on appelle des sauts relatifs, qui peuvent se faire vers I'avant 
ou vers I'arriere. 

Prenons I'exemple du petit programme suivant : 






21 


- 6 


1 


- 5 





- 4 


2B 


- 3 


18 


- 2 


FA 


- 1 



Les trois premiers octets chargent HL avec 1. Le quatrieme decremente 
HL. Le cinquieme indique un saut, et le sixieme le sens et la longueur 
de ce saut. 

Ici le saut est de — 6. Le programme va boucler sans arret, HL 
passant ainsi alternativement de a 1 et de 1 a 0. Vous remarquerez 
que I'octet indiquant la longueur et le sens du saut (FA), est lui-meme 
decompte. 

Sa valeur en hexadecimal est determine par la formule suivante 
(uniquement valable pour les sauts en arriere) : 

HEX$ (256 - longueur du saut souhaite) 

Ici : HEX$ (256-6)= FA 

Un saut de -31 donnerait par exemple : HEX$(256-31) = E1 
La longeur maximale d'un saut en arriere est de —128. 
Voyons maintenant le cas d'un saut en avant : 

21 
1 

18 
i—3 
11 

7 +1 
+2 
2B +3 
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Le quatrieme octet indique un saut relatif et le cinquieme d' 
son sens et sa longueur. Cette fois, non seulement cet octet n e e d ermine 
etre compte, mats le suivant non plus (ici 11). i pas 

Pour un saut en avant, I'octet determinant sa longueur se cal 



comme suit : 



HEX$ (longueur du saut) 

Ici : HEX$(3) = 3 

Un saut de 50 donnerait par exemple : HEX$(50) = 32 

La longueur maximale d'un saut en avant est de 127. 

Pour vous faciliter la tache lorsque vous concevrez vos propres 
programmes, nous vous proposons ci-apres deux tables : I'une pour les 
sauts en avant et I'autre pour les sauts en arriere. 

Table des sauts en avant : 



* 5 6 7 8 9 10 11 12 13 14 15 
20 21 22 23 24 25 26 27 28 29 30 31 



□ 1 2 3 

16 17 18 19 

32 33 31 35 36 37 38 39 40 41 42 43 44 45 46 47 

48 49 50 51 52 53 

64 65 66 67 

80 81 82 83 



68 
84 



69 



54 
70 



55 56 57 



59 60 61 62 63 



71 72 73 74 75 76 77 78 79 



85 86 87 88 89 90 91 92 93 94 95 
96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 
112 113 114 115 116 117 118 119 129 121 122 123 124 125 126 127 



Table des sauts en arriere : 






1 


2 


3 


4 


5 


6 


7 


8 


9 


A 


B 


C 





E 


F 




128 


127 


126 


125 


124 


123 


122 


121 


120 


119 


118 


117 


116 


115 


114 


113 




112 


111 


110 


109 


108 


107 


106 


105 


104 


103 


102 


101 


100 


99 


98 


97 




96 


95 


94 


93 


92 


91 


90 


89 


88 


87 


86 


85 


84 


83 


82 


81 




80 


79 


78 


77 


76 


75 


74 


73 


72 


71 


70 


69 


68 


67 


66 


65 




64 
48 


63 

47 


62 
46 


61 
45 


60 
44 


59 
43 


58 

42 


57 

41 


56 

40 


55 
39 


54 
38 


53 

37 


52 
36 


51 


50 


49 




35 


34 


33 




32 

16 


31 
15 


30 
14 


29 

13 


28 
12 


27 

11 


26 
10 


25 
9 


24 
8 


23 

7 


22 
6 


21 
5 


20 


19 


18 
2 


17 

1 




4 


3 





L'octet correspondant a une valeur de saut est constitue par la lettre 
ou le chiffre en regard de la valeur choisie dans le tableau, sur la 
colonne de gauche, et par la lettre ou le chiffre en regard sur la ligne 
du haut. 
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2. LES COORDONNEES GRAPHIQUES 
RELATIVES ET ABSOLUES 






LES COORDONNEES ABSOLUES 



L'ecran du CPC peut etre considere comme un repere orthonorme, dont 
I'origine se situe au coin inferieur gauche, I'axe des X (abscisses) allant 
de a 639, et I'axe des Y (ordonnees) de a 399 : 



ordonnees 



f 

i 

i 






origine (0,0) 



7 


- 




6 


. 




5 






4 






3 




., A (fi 11 




y « \o,o) 


2 




i 
i 


1 




! 

' 



123456789 

abscisses 



Les coordonn^es dites absolues sont toujours exprime'es en fonction de 
I'origine. Exemple : le point A, de coordonn£es absolues (6,3). 
II faut savoir en outre que, lorsque vous allumez la machine, le curseur 
graphique (qui peut etre considere comme la pointe du crayon 
permettant de dessiner sur l'ecran) est positionne en (0,0). Mais des 
qu'un point quelconque est dessine grace a I'instruction BASIC PLOT, 
le curseur graphique se retrouve positionne sur ce point. La regie 
g^nerale est que le curseur se trouve toujours sur le dernier point 
dessine, ou a I'extremite de la derniere ligne dessine. 
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Les lignes peuvent etre dessinees avec I'instruction BASIC DRAW la 
ligne est tracee a partir de la position du curseur graphique a ce 
moment la, jusqu'au point dont les coordonnees absolues suivent 
I'instruction DRAW (il s'agit bien de coordonnees absolues, et I'extremite 
de la ligne sera independante de la position du curseur. 

Essayez par exemple de lancer le programme suivant, qui trace deux 
lignes: 



10 MODE 1 
20 PLOT 200,300 
30 DRAW 300,250 
40 PLOT 150,100 
50 DRAW 300,250 

Voici ce que vous obtenez : 

(200, 300) 






(300,250) 









■ 
r (150, 100) 



La ligne 20 dessine un point de coordonnees absolues (200,300). Par 
la meme occasion, le curseur y est positionne. 

La ligne 30 trace une droite a partir du curseur graphique jusqu'a la 
position de coordonnees absolues (300,250). II s'agit de la droite 1. 
Le curseur se trouve maintenant en (300,250). 

La ligne 40 dessine un point de coordonnees (150,250) et y fixe le 
curseur graphique. 

La ligne 50, enfin, trace une droite a partir du curseur graphique 
jusqu'a une position absolue (300,250). 
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Pour nos programmes en langage machine, nous utiliserons les deux 
routines suivantes : 

&BBEA qui est I'equivalent de PLOT en BASIC (dessin d'un point) 
&BBF6 qui est I'equivalent de DRAW en BASIC (trace d'une ligne 
allant du curseur graphique jusqu'a la position absolue specifiee). 



LES COORDONNEES RELATIVES 



Les coordonnees dites relatives sont toujours exprimees en fonction 
de la position du curseur graphique a ce moment-la (c'est-a-dire comme 
si la position de ce dernier repr^sentait I'origine des axes). 

Un point de coordonnees relatives peut etre dessine en BASIC grace 
a I'instruction PLOTR. 



Exemple 



10 MODE 1 

20 PLOT 100, 50 (dessin du point A, en coordonnees absolues) 
30 PLOTR 50, 60 (dessin du point B, en coordonnees relatives) 
40 PLOTR 80,10 (dessin du point C, en coordonnees relatives) 



120 I- 
110 h- 



"TB 

I 

! 



50 






I 






(0,0) 



100 



150 



230 



On peut effectivement constater que les coordonnees absolues de B 
sont (150,110), mais ses coordonnees relatives par rapport a A (ou se 
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trouve le curseur quand B est dessine) sont bien (50,60). D'une maniere 
moms orthodoxe, on pourrait dire que B est plus a droite que A de 50 
et plus haut de 60. 

De la meme maniere, les coordonnees absolues de C sont (230120) et 
ses coordonnees relatives par rapport a B sont (80,10). 

Les "lignes relatives" peuvent etre tracees grace a I'instruction BASIC 
DRAWR : trace d'une ligne a partir de la position du curseur graphique 
a ce moment la, jusqu'a une position dont les coordonnees relatives a 
ce curseur suivent I'instruction DRAW. 

Exemple 

10 MODE 1 : PLOT 100,200: DRAW 70,-90 




(0,0) 



100 



170 



L'extremite B de la droite a pour coordonnees absolues (170,110), et 
pour coordonnees relatives par rapport a A (70,-90). Elle est en effet 
de 70 plus a droite que A, et de 90 plus basse que B. 

En langage machine, nous utiliserons les deux routines suivantes : 

&BBED qui est I'equivalent de PLOTR. 
&BBF9 qui est I'equivalent de DRAWR. 

Notons enfin qu'il est possible de positionner le curseur graphique a 
une position absolue donnee, sans rien dessiner, grace a I'instruction 
BASIC MOVE, dont la routine equivalente, que nous utiliserons en 
langage machine, est &BBC0. 
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3. LA MEMOIRE ECRAN 



Pour simplifier cette etude, nous nous limiterons dans un premier 
temps au mode 1 . 

La memoire ecran est une zone de 16K (16384 octets) qui, lorsque 
vous allumez votre machine, va de I'adresse 49152 a I'adresse 65535. 
Le schema de la page suivante montre son organisation. 

Comme vous pouvez le constater, chaque colonne a 2 octets de large 
et chaque ligne 8 octets de haut, ce qui implique qu'en mode 1 un 
caractere tiendra sur 8 fois 2 = 16 octets (pour information, 1 octet 
comprend 8 bits ou, si I'on parle de I'ecran, 8 pixels, ou encore 8 points 
de large). 

L'ecran du CPC est un peu particulier. Vous remarquerez en effet 
que la premiere rangee d'octets (ou si I'on veut le premier "trait" de la 
premiere ligne), commence a I'adresse 49152 et finit a I'adresse 49231. 
On pourrait logiquement s'attendre a ce que le deuxieme trait commence 
a I'adresse 49232, ce qui n'est pas le cas (il commence en 51200). 
L'octet 49232 se trouve au debut du premier trait de la deuxieme ligne. 

Les octets de la memoire ecran sont done numerates de la maniee 
suivante : d'abord les premiers traits des 25 lignes de l'ecran, puis les 
deuxiemes traits, puis les troisiemes, et ainsi de suite. 

On peut facilement verifier cela en essayant ce petit programme : 

10 MODE 1 

20 FOR 1 = 49152 TO 51151 : POKE 1,255 : NEXT 

30 FOR 1 = 51200 TO 53199 : POKE 1,150 : NEXT 

La ligne 20 trace les premiers traits de toutes les lignes en rouge et 
la ligne 30 les deuxiemes traits de toutes les lignes en bleu clair. 

Une curiosite subsiste neanmoins, qui ne vous a certainement pas 
echapp£ : le trait n°1, par exemple, se termine en 51151 (25 e ligne). Or 
le deuxieme trait commence en 51200 (1 re ligne). Manquent done a 
I'appel 48 octets, et il en est de meme a la fin de chaque trait, e'est-a- 
dire 8 fois. 

En fait, ces 48 fois 8 = 384 octets ne sont pas perdus, puisque la 
machine s'en sert pour gerer par exemple les scrollings d'ecran 
( = deplacements, dans I'une des quatre directions, de tout I'ecran). 
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Cette disposition de la memoire <§cran, pour particuliere qu'elle soit 
n'est en realite guere plus difficile a travailler qu'une autre, dans la 
mesure ou I'on est averti. 

En particulier, et parce que nous nous en servirons dans nos 
programmes, sachez que : 

• Pour passer d'un trait a un autre d'une meme ligne, on ajoute ou on 
enleve 2048 ou un de ses multiples. Par exemple, pour passer 
du deuxieme au troisieme trait de la ligne 1, il suffit de faire 
51200 + 2048 = 53248.- Cela est valable quelle que soit la position 
d'octet initiale. 

• Pour passer sur le meme trait d'une autre ligne, on enleve ou on 
ajoute 80 ou un des ses multiples. Par exemple, pour passer du 
premier trait de la premiere ligne au premier trait de la 24 e ligne, il 
suffit de faire 491 52 + (23 X 80) = 50992. 

• Le numero d'un octet precis peut toujours §tre determine a partir du 
numero de colonne et du numero de ligne correspondants. Par 
exemple, pour calculer I'octet bas/gauche de I'emplacement situe a 
I'intersection de la deuxieme colonne et de la 24 e ligne, il suffit de 
calculer 63406 + (80x24) + (2x2). La formule generale est dans ce 
cas precis 63406 + 80Y + 2X). 



Pour conclure, parlons un peu des differents modes possibles et de 
leurs differences (nous laisserons de cote le probleme des couleurs, qui 
est plus complexe et nous eloignerait du sujet de ce livre). 

Vous n'ignorez pas qu'il est possible, sur I'Amstrad, de travailler sur 
20 colonnes en mode 0, sur 40 colonnes en mode 1, et sur 80 colonnes 
en mode 2 (le nombre de lignes reste inchange : 25). Mais en terme 
d'octets, la configuration de la memoire ecran est la meme pour les 
trois modes. L'ecran ayant une largeur de 80 octets, le calcul est vite 
fait: 

• En mode 0, chaque caractere est contenu dans une surface de 
4 octets de large (sur la figure precedents, un caractere ecrit en 1,1 
s'inscrirait dans le rectangle determine par les octets 49152, 49155, 
63488 et 63491). 

• En mode 1, chaque caractere s'inscrit dans une surface de 2 octets 
de large (le caractere cite plus haut s'inscrirait entre les octets 49152, 
49153, 63488 et 63489). 
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lere 
colonne 


2eme 
colonne 










49152 


49153 


49154 


19155 


49156 




1 


51200 


51201 


51202 


51203 


51204 




1 


53248 


53249 


53250 


53251 


53252 




lere J 


55296 


55297 


55298 


55299 


55300 




ligne ( 


57344 


57345 


57346 


57347 


57348 




J 


59392 


59393 


59394 


59395 


59396 




1 


61440 


61441 


61442 


61443 


61444 




1 


63488 


63489 


63490 


63491 


63492 




/ 


49232 


49233 


49234 


49235 


49236 




1 


51280 


51281 


51282 


51283 


51284 




\ 


53328 


53329 


53330 


53331 


53332 




2eme J 


55376 


55377 


55378 


55379 


55380 




ligne ) 


57424 


57425 


57426 


57427 


57428 




1 


59472 


59473 


59474 


59475 


59476 




1 


61520 


61521 


61522 


61523 


61524 




\ 


63568 


63569 


63570 


63571 


63572 




/ 


i ■ 


i j 
■ i i 

i * i 






50992 


50993 


50994 


50995 


50996 






53040 


53041 


53042 


53043 


53044 






55088 


55089 


55090 


55091 


55092 




24eme ) 


57136 


57137 


57138 


57139 


57140 




ligne \ 


59184 


59185 


59186 


59187 


59188 




/ 


61232 


61233 


61234 


61235 


61236 






63280 


63281 


63282 


63283 


63284 






65328 


65329 


65330 


65331 


65332 






51072 


51073 


51074 


51075 


51076 






53120 


53121 


53122 


53123 


53124 




\ 


55168 


55169 


55170 


55171 


55172 




25eme ) 


57216 


57217 


55218 


55219 


55220 




ligne \ 


59264 


59265 


59266 


59267 


59268 




1 


61312 


61313 


61314 


61315 


61316 




1 


63360 


63361 


63362 


63363 


63364 




\ 


65408 


65409 


65410 


65411 


65412 
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39eme 
colonne 



40eme 
colonne 



49227 



51275 



53323 



55371 



57419 



59467 



49228 



51276 



53324 



55372 



57420 



61515 



63563 



49307 



51355 



53403 



59468 



61516 



63564 



49308 



51356 



55451 



57499 



59547 



61595 



63643 



53404 



49229 



51277 



53325 



55373 



57421 



59469 



49230 



51278 



53326 



55374 



57422 



61517 



63565 



49309 



51357 



55452 



57500 



59548 



61596 



63644 



53405 



55453 



59470 



61518 



49231 



51279 



53327 



55375 
57423 



59471 



63566 



49310 



51358 



53406 



57501 



59549 



61597 



63645 



55454 



57502 



57550 



61598 



61519 



63567 



49311 



51359 



53407 



55455 



57503 



59551 



63646 



61599 



63647 





1 

1 


• 
f 


i 
i 


• 


1 


1 




51067 
53115 


51068 
53116 


51069 
"51117 


51070 

C71 ID 


51071 

C7 i i n 






55163 


55164 


J J J. J. / 
55165 


55166 


->ji iy 

55167 






57211 


57212 


57213 


57214 


57215 






59259 


59260 


59261 


59262 


59263 






61307 


61308 


61309 


61310 


61311 






63355 


63356 


63357 


63358 


63359 






65403 


65404 


65405 


65406 


65407 






51147 


51148 


51149 


51150 


51151 






53195 


53196 


53197 


53198 


53199 






55243 


55244 


55245 


55246 


55247 






57291 


57292 


57293 


57294 


57295 






59339 


59340 


59341 


59342 


59343 






61387 


61388 


61389 


61390 


61391 






63435 


63436 


63437 


63438 


63439 






65483 


65484 


65485 


65486 


65487 





Numero du 

trait 

1 
2 

3 
4 
5 
6 
7 
8 

1 
2 
3 

4 
5 
6 
7 
8 



1 
2 
3 
4 
5 
6 
7 
8 

1 
2 
3 
4 
5 
6 
7 
8 
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• En mode 2 enfin, chaque caractere s'inscrit sur une surface de la 
largeur de I'octet (le caractere cite plus haut s'inscrirait entre les 
octets 49152 et 63488). 

II faut parfois tenir compte de tout cela dans certains programmes, 
si I'on veut les utiliser en plusieurs modes. 
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4. QUELQUES ROUTINES DU SYSTEME 
D'EXPLOITATION 



ROUTINES "TEXTE" 



&BB5D 



&BB5A 



&BB75 



&BB90 
&BB96 



Represente un caractere sur I'ecran, a la position actuelle 
du curseur de texte. Le curseur est ensuite decale d'une 
position vers la droite. 

Registre d'appel : le code du caractere doit etre charge 
dans A. 

Represente un caractere sur I'ecran, ou I'execute s'il s'agit 
d'un caractere de commande (le code 7, par exemple, 
produira un son de cloche — voir a ce sujet les pages 
9.2, 9.3 et 9.4 du guide de I'utilisateur). 
A doit etre utilise comme pour la routine precedente. 

Fixe le curseur texte a une position donnee de I'ecran. Le 
numero de colonne doit §tre charge dans H et le numero 
de ligne dans L. Les routines &BB6F et &BB72 permettent 
respectivement de fixer le curseur texte a I'interieur de la 
ligne ou il se trouve, ou a une position donnee de la 
colonne ou il se trouve. Les numeros de colonne ou de 
ligne doivent etre charges dans A. 

Fixe la couleur de stylo. Le numero de couleur doit §tre 
charge dans A. 

Fixe la couleur du papier. Le numero de couleur doit §tre 
charge dans A. 
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ROUTINES "GRAPHIQUE' 



&BBCO Fixe le curseur graphique a une position absolue. L'abs- 
(j Jjfnfto cisse de cette position doit etre chargee dans DE et 
I'ordonnee dans HL. Up: »«•/€ D£,Hl. 

&BBC3 Fixe le curseur graphique a une position relative a la 

fyf067 position actuelle du curseur. HL et DE doivent etre 

employes comme precedemment. eju: Afoyert OE t HL , 

&BBE1 Fixe la couleur de I'ecriture graphique. Le numero de 
Wfi&i couleur doit etre charge dans A. *f>: £**•*«£* r£N A. 

&BBE4 Fixe la couleur du papier graphique. ^A doit etre utilise 
IffAoo comme precedemment. etjv ■. 6rtAft>U-S PAflfft ^. 

'&BBEA"' Dessine un point a une position absolue. L'abscisse et 
't$4o(> I'ordonnee doivent respectivement etre chargees dans DE 
et HL. ef/i Pi&T OS, Hi- 

&BBED Dessine un point a une position relative au curseur 

^fJe^ graphique. DE et HL doivent etre employed comme 
precedemment. -Can. PibTR D£,HL 

&BBF6 Dessine une droite a partir du curseur graphique jusqu'a 
#f/V/ une position absolue dont les coordonnees doivent etre 
dans DE pour l'abscisse, et dans HL pour I'ordonnee. 

&BBF9 Dessine une droite a partir du curseur graphique jusqu'a 

4fj£j une P os 'ti° n relative a ce curseur. HL et DE s'emploient 

comme precedemment. Of A PRAwR 0£ t HL. 

&BBFC Ecrit un caractere a la position actuelle du curseur 

^ mfy graphique. Ce dernier determine 1'a n glo superieur gauche 

du caractere. Le curseur est ensuite deplace d'une largeur 

de caractere. Cette largeur depend bien entendu du mode. 

Le code du caractere doit etre charge dans A. »G" ^5£J. J( . 
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AUTRES ROUTINES 



&BB06 



&BC14 

ttA+r 

&BD19 



Cette routine effectue une boucle tant qu'une touche 
n'est pas trapped. Lorsqu'une touche est frappee le 
retour est effectue. et A contient le code du caractere 
correspondant a la touche. Signalons que, si la touche 
frappee est une touche de deplacement du curseur A 
contient : FO pour — , F3 pour t, F1 pour — et F2 pour I 
Cela est bien sur particulierement interessant pour les 
jeux inter-actifs. ojju> Wti\i£ A=> '■. A = ltiK£yf. MIEKD 

Efface I'ecran. <X/o: CL&- t * r 

Attend le retour du rayon. Cette routine permet la 
synchronisation des animations graphiques avec le 
balayage de I'ecran. £oj: FftArtf 



ROUTINES "ARITHMETIQUE A VIRGULE FLOTTANTE' 



&BD30 
&BD40 

•iWt 



&BD46 
&BD8B 



&BD88 

&BD5B 
WW 

&BD5E 



Copie une variable de (DE) dans (HL). DE doit etre points 

sur I'adresse de la variable a recopier. efffO: J&Otff f££K(M \P66k. 

Transforme une. representation entiere en une representa- 
tion a virgule flottante. L'entier doit etre charge dans HL 
et I'adresse ou doit etre stockee la representation en 
virgule flottante dans DE. e.nUe. r -^ PloKnt- / 

Transforme une representation en virgule flottante en un 
entier. HL doit etre pointe sur I'adresse de la representa- 
tion en virgule flottante. Au retour, l'entier est dans HL. 
r~ - , , „ fife ^•oLt-'t ~> onKer 

Lalcule le cosinus d un angle. HL doit etre pointe sur 

I'adresse de la representation en virgule flottante de 
I'angle. Le resultat est range a cette adresse. P»Kf(.H-l|/ t**ZA ) 

Meme chose, mais pour le €«sinus. 

Effectue I'operation (HL)-(DE). Le resultat est range dans 

Effectue I'operation (DE)-(HL). Le resultat est range dans 
(HL). 
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&BD58 Effectue l'op<§ration (HL) + (DE). Le r£sultat est rangd dans 

mii [HLJL 

&BD64 Effectue l'ope>ation (HL)/(DE). Le resultat est range dans 

W// (HL). 

&BD6D Change le signe de (HL). 



ROUTINES "ARITHMETIQUE ENTIERE" 



&BDACLCI) Effectue I'operation HL + DE. Le resultat est charge dans 

WSG HL. 

&BDAFO>0 Effectue I'operation HL-DE. Le resultat est charge dans 

ktStt HL. 

&BDBE[^ f Effectue I'operation HLxDE. Le resultat est charge dans 

WSVt HL. 

&BDC1 [Si Effectue I'operation HL/DE. Le resultat est charge dans 

fjS*5* HL. 

&BDC7/.£tf Inverse le signe de HL 
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5. LES VARIABLES 



LES VARIABLES NUMERIQUES 

Comme vous le savez sans doute, le BASIC fait la difference entr P 
ce que I'on appe.le les nombres entiers et les nombres decTma UX (£ 
nombres ne sent pas tra.tes de la meme maniere. et il existe d'ailleur 

oue Z Z ^ °' ta I?"' dGUX b ' OCS diStmCtS de rOUtines ar ^m" 

&£C s var,ab,es enti * res et '' autre pour les variabl - ^ 

nllT T lement savoir <* ue 'e traitement des variables a virgule 
flottante est nettement plus long que celui des variables entieres 
La l.gne su.vante, par exemple, sera executee en 5,6 secondes environ : 

FOR I % = 1 TO 10000 : NEXT I % 

Mar^rJ!" Si8 , na ' e 3 ' a m f Chine qU ' Jl S ' agit d ' un nombr * entier.) 
Mors que celle-c. le sera en plus de 10 secondes : 

FOR 1 = 1 TO 10000: NEXT I 

sto^tn° nS - n ° US int ^ 6SSer a ' a mam '^ e dont ces variables sont 
stockees en memoire par la machine. 

cJ:^^ 5 Variables entikres est simple: elles sont stockees sur deux 
serndTISt fort.^" 1 '" 6 C ° ntient ''° Ctet faib ' e du n ° mbre ' Ct ,a 
Nous pouvons le verifier grace au pointeur de variable que I'on peut 
appeler avec I arobas (@). Cette fonction permet d'obtenir I'adresse 
dune vanable e'est-a-dire I'adresse de ('emplacement memoire cove- 
nant I octet faible de cette variable (I'octet fort etant situe immediate- 
ment apres). 

, Es f.T Z . P ar exem P le d « taper ceci (en mode direct et apres avoir 
einmalise la machine) : 

A% = 4 



- 119 - 



Puis : 

PRINT @ A % 

Vous obtenez 374. 

L'octet faible de A % est done stocke dans I'emplacement memoire 
374 et l'octet fort dans I'emplacement 375. On peut le verifier en 
faisant : 

PRINT PEEK(374) 

On obtient 4. 

PRINT PEEKI375) 

On obtient 0. 

Un nombre peut etre calcule a partir de son octet fort et de son 
octet faible grace a la formule : 

(octet fort * 256) + octet faible 

(si Ton est sur qu'il est positif, le probleme etant un peu different pour 
les nombres negatifs.) 

Dans notre cas, nous avons bien : 4 = (0 * 256) + 4 

Essayez maintenant ceci : 

A % = 500 



Puis ; 

PRINT PEEK (@ A %) + PEEK (@ A % + 1) * 256 






Vous obtenez bien 500. 

Le premier PEEK donne le contenu de I'emplacement memoire ou 
est situe l'octet faible de A %, et le second le contenu de I'emplacement 
memoire ou est situe l'octet fort. 

Pour conclure, retenons simplement qu'une variable entiere est 
stockee sur 2 octets, et que l'octet faible est situe en "premiere 
position". 

Le cas des variables a virgule flottante est un peu plus complexe, 
puisque 5 octets sont necessaires pour leur stockage en memoire (pour 
information, les quatre premiers octets s'appellent la mantisse, et le 
cinquieme Vexposant). 
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Pour ces variables a virgule flottante, la fonction @ donn Pra v a 
du prem.er des cinq emplacements memoire ou elle est stoS • * 

Notons enfin qu'il est possible de transmettre I'adres se d un f- u, 
grace a Parobas lors de ('utilisation de ('instruction Call "^ 

CALL Adresse du programme, @ variable 

Nous utilisons cette possibility dans le dernier programme H„ , . 
ouvrage (Tri de donnees alphanumeriques) de Cet 

J£; SaV6Z mai "tenant assez sur les variables numeriques pour 
etudier les programmes presentes. 



1ES VARIABLES ALPHANUMERIQUES 



Les variables alphanumeriques sont des variables pouvant etre 
const, uees de lettres, de chiffres, ou des deux ensembles. Elles sont 
signalees par le symbole $. Par exemple : 

A$ = "JAMES BOND 007" 

Une chaTne alphanumerique (c'est-a-dire comprenant plusieurs ele- 
ments alphanumeriques) est bien sur stockee en memoire sous la forme 
dune succession des codes ASCII des elements qui la composent La 
chame "JAMES BOND 007", par exemple, se presenter ainsi 

&4A (code ASCII de J) 

&41 (code ASCII de A) 

&4D (code ASCII de M) 

&45 (code ASCII de E) 

&53 (code ASCII deS) 

&20 (code ASCII de I'espace) 
etc. 

La encore, I'arobas peut etre utilise. 

Dans ce cas, pourtant, I'adresse obtenue ne sera pas directement 
I adresse de la variable, mais I'adresse de ce que Ton appelle son 
descnpteur de chaTne. Ce descripteur comporte 3 octets : 
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octet 1 : 


Longueur 
de la chaTne 


octet 2 : 


Adresse du debut 
de la chame 
(poids faible) 


octet 3 : 


Adresse du debut 
de la chaTne 
(poids fort) 



emplacement memoire 
d'adresse @ variable 

emplacement memoire 
d'adresse (@ variable) +1 



emplacement memoire 
d'adresse (@ variable) - 



Notons que la longueur d'une chaTne de caracteres (ou, si Ton veut, 
son nombre d'elements) ne pouvant depasser 255, le chiffre indiquant 
cette longueur peut toujours tenir sur 1 octet. 

EXEMPLE: 

t A *=» JAMES BOND^L^PEEKCeA^ADR^PEEK^ 
A*+l)+PEEK«A*+2)*256sF0R 1*0 TO L 

NT CHR*«PEEK(ADR+D)^NEXT 

RUN 

JAMES BOND 
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V 

Instructions 



iViW^ 



A\ G> 

At c 
43 

AH 2 
\5 P 















Cette partie recapitule et decrit d'une maniere formelle les instructions 
utilisees dans les programmes presenter. 

Celles-ci sont classees dans I'ordre alphabetique de leurs mnemo- 
niques, dont les representations conventionnelles notables sont les 
suivantes : 

• Les registres doubles sont, selon le cas, symbolises par ss, rr ou dd. 

• Les registres simples son* symbolises par r. 

• Les donnees immediates tenant sur un octet (ou si Ton veut, les 
valeurs quelconques n'ayant qu'un octet faible) sont representees par 
n. Les autres sont representees par nn. 

• L'adresse d'un emplacement memoire est representee par nn, et le 
contenu de cet emplacement memoire par (nn). 

• La partie basse d'un registre double est celle ou se trouvent les octets 
de poids faible. La partie haute est celle ou se trouvent les octets de 
poids fort. 

Signalons d'autre part que : 

• Une description detaillee de I'instruction est proposee lorsque cela 
semble necessaire. 

• Seuls les eventuels effets sur les indicateurs S et Z ont ete specifies. 

• Concernant toutes les instructions de chargement, la regie generale 
est que la source n'est pas modifiee par I'instruction (cela concerne 
egalement les instruction de transfert repetitif). 

ADD HL,ss (Additionner HL et le registre double ss) WL+& ^ H*- 

Octetl : Selon registre ss (BC:09 - DE:19 - HL29K 

Description : Le contenu du registre double specifie est additionne 
au contenu de HL. Le resultat est range dans HL, I'autre registre 
restant inchange. 

Indicateurs : aucun effet. 
<W>'. HU rU-t-SS 
BIT 6,r(Test du bit b du registre r) 

Octet 1 : CB '- fao %) 

Octet 2 : Selon le registre et le bit 
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Numero de bit 




ex- 

••5? B^afclfeZ^ 



... 

Indicateurs : L mdicateur Z est mis a 1 .si le bit teste est 0, et il est 

mis a autrement. L'indicateur S est modifie aleatoirement 

C4U pq (Appel du sous-programme d'adresse pq) 
Octet 1 :CD s(Zo§ 

Octet 2 adresse, poids faible • ' 

Octet 3 : adresse, poids fort 

Observation; Lorsque cette instruction est rencontree, I'adresse de 
retour du sous-programme est deposee sur la pile. 

Indicateur : aucun effet. 
Urmf. CrObofc 
CP s (Comparaison de I'operande s et de I'accumulateur A) 
« Si s est un registre : , -. \ , _ . ^ / -_\ , 

SKiiJ re8istre m - Utl ™ - &?-$?- 

* Si s est une donnee immediate : 
Octet 1 : FE s-ZS^ 
Octet 2 : donnee immediate \. 

• Si s est (HL) : 

Octet 1 : BE i (£$ o) 

• Si sest(IX + d): - 
Octet 1:DD a (T/l 1) 
Octet 2 : BE ~ \A<% ) 
Octet 3 : d 
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Indicateurs : L'indicateur Z est mis a 1 quand le test indique 
I'egalite. Pour effectuer la comparaison, le processeur soustrait 
I'operande de I'accumulateur, mais sans conserver le resultat 
(I'accumulateur reste inchange). L'indicateur S est par consequent 
modifie selon le resultat. 

DEC m (Decrementation de I'operande m) . . . 

(£1) LS) (-#3) 

Si r est un registre - Octet 1 : selon registre (A:3D - B:05 - COD 
- D:15 - E:1D - H:25 - L:2D) 

Description : Le contenu du registre specif ie est diminue de 1. 

Indicateurs . S et Z sont modifies selon le resultat. 

CcymP • rr\ = tn — A 

DEC rr (Decrementation du registre double rr) , , _, \ 

M) W"*) lk3 ' 

Octet 1 : selon registre (BCDB - DE:1B - HL:2B) 
Indicateurs : aucun effet. 

DEC IX (Decrementation du registre IX) 

Octet1:DD=('2/M) 

Octet2:2B ~ (_ \\) 

Indicateurs : aucun effet. 

DJNZ e (Decrementation de B et saut relatif de e si non nul) 

Octet 1 :10 ~(A.(o) - - -„ - 

Octet 2 : longueur du saut (^ s & m A 

Indicateurs : aucun effet 

Gamp • 

EX DE, HL (Echange des registres HL et DE) 
Octet 1 : EB X (1%S) 
Indicateurs : aucun effet. 

INC rr (Incrementation du registre double rr) , - 
Octet 1 : selon registre (BC03 - DE:13 - HL:23) 
Description : Le contenu du registre specif ie est augmente de 1. 
Indicateurs : aucun effet. 

Gnrv^. . -cr r t?+ A, 
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INC />f (Incrementation du registre IX) 
Octet 1 : DD =• ( 1*2 -\) 
Octet 2 : 23 ~ ( Z S\) 

Indicateurs : aucun effet. 
GrV^f . (ft- | X4 ^, 

/P cc, pq (Saut conditionnel a I'adresse pq) ," ■■ "I 

rt „ c^U (tso} (i©0 

Octet 1 : selon condition (positif : F2 ; negatif : FA ; nul : CA non 
nul : C2) 

Octet 2 : adresse, poids faible 

Octet 3 : adresse, poids fort 

Description : Si la condition specifiee est remplie, le programme 
saute a I'adresse indiquee. Sinon, cette adresse est ignoree et le 
programme se poursuit normalement. 

Indicateurs : aucun effet. 

W^VP?P)°^ ^ COACtU;<W\ dSLZ 

JP pq (Saut a I'adresse pq) 

Octet "l:<3-«( .43$-) 

Octet 2 : adresse, poids faible 
- Octet 3 : adresse, poids fort 

Description : Le programme saute a I'adresse indiquee. 
Indicateurs .aucun effet. 

)R cc, e (Saut relatif conditionnel de e) 

Octet 1 : selon condition (nul : 28 - non nul : 20) 
Octet 2 : longueur du saut 

Indicateurs : aucun effet. 
(*YY\f t 

JR e (Saut relatif de e) 

Octet 1 : 18 s-C ^Aj 
Octet 2 : longueur du saut 

Indicateurs . aucun effet. 

C<7v*p: 

+ LD dd, (hn;(Chargement du registre double dd a partir de I'emplacement 
memoire d'adresse nn) 
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Octet 2 : selon registre (BC4B - DE:5B - HL:6B) 



Octet 1 



Octet 3 : adresse, poids faible 

Octet 4 : adresse, poids fort 

* - 

Description : Le contenu de ('emplacement memoire dont I'adresse 

est sp£cifi£e est charge dans les poids faibles du registre choisi. Le 

contenu de I'emplacement memoire suivant immediatement le 

precedent est charge dans les poids fort du registre. 

Indicateurs : aucun effet. 

• LD dd, nn (chargement du registre double dd avec la donnee immediate 

nn) ^oQic«&#f)«S.^a^^. fl4 0<X ^^ = hn 

Octet 1 : selon registre (BCJ,- DE:11 - HL21) 
Octet 2 : donnee immediate, poids faible *■ s 
Octet 3 : donnee immediate, poids fort 

Indicateurs : aucun effet. 

£■0™^ '■ && - ^ 

»LD r, n (Chargement du registre r avec la donnee immediate n) 

Octet 1 : selon registre (A:3E - B:06 - C:OE - D:16 - E:1E - 

H: Bv L:2 &) ut; l ° LAk) (1I) do) 

Octet 2 : donnees immediate 
Indicateurs : aucun effet. 

Cermp \ r^V> 

* LD r, r' (Chargement du registre r a partir du registre r') 

Octet 1 : selon registre 



destinataire 



A 
B 
C 
D 
E 
H 
L 
Indicateurs : aucun effet. 




(source) 



Ci^nAO'. 



r*.. 



; V 
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LD (BC), A (Chargement de I'emplacement memoir* ,h, 

partir de I'accumulateur) memo.re adresse par BC a 

Octet 1 : 2 * (ei") 
Indicateurs • aucun effet. 

LD (DE), A (Chargement de I'emplacement memoire adresse D ar Vtr • 
partir de I'accumulateur) 

Octet 1 :12 = (st f) 

Indicateurs : aucun effet. 

LD (HL), n (Chargement de la donnee immediate n dans I'emplacement 
memoire adresse par HL) 

Octet 1 :36 - f Sk") 
Octet 2 : donnee immediate 

Description : La donnee fournie est chargee dans I'emplacement 
memoire dont I'adresse est dans HL. 

Indicateurs : aucun effet 

LD r, (IX+d) (Chargement du registre r a partir de I'emplacement 
memoire d'adresse IX + d) 

Octtl ,:DD tlMJbtt, , M) (*, (ti) &) 

Octet 2 : selon registre (A:7E - B:46 - C:4E - D 56 - E5E - 

Uctet 3 . deplacement 

Description : Le contenu de I'emplacement memoire dont I'adresse 
est IX + d (d est appele "deplacement"), est charge dans le registre 
specifie. 

. Indicateurs : aucun effet. 

*LD (nn), dd (Chargement de I'emplacement memoire d'adresse nn a 
partir du registre double dd) pm 

Octet 1 ED *( \U) ^ m £ z ?\i ft ) 
Octet 2: selon registre (BC:43 - DE.53 - HL.63) 
Octet 3 : adresse, poids faible 
Octet 4 : adresse, poids fort 
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Description : Le contenu de la partie basse du registre specifie 
(c'est-a-dire la partie contenant I'octet faible) est charge dans 
I'emplacement memoire indique. Le contenu de la partie haute du 
registre est charge dans I'emplacement memoire suivant immediate- 
ment le precedent. 

Indicateurs : aucun effet. . 

C«rm9\ CntO = && Cru. Vo «4. (*r>) , d<X 

• LD (nn), HL (Chargement de I'emplacement memoire d'adresse nn a 
partir de HL) ^ ^lW^UCQ»Q^ wi.f1VS&di) (n ft) 

Octet 1 : 22 2 ( ¥*) hi) 5. H (- 

Octet 2 : adresse, poids faible /. 
Octet 3 : adresse, poids fort W 

Description : Le contenu du registre L est charge dans I'emplace- 
ment memoire dont I'adresse est specifiee. Le contenu du registre 
H est charge dans I'emplacement memoire suivant immediatement 
le precedent. 

Indicateurs : aucun effet. n v . \ u i 

LD A, (BC) (Chargement de I'accumulateur a partir de I'emplacement 
memoire adresse par BC) 



Octet 1 : A a £ 'to) 



Indicateurs : aucun effet. 

LD A, (DE) (Chargement de I'accumulateur a partir de I'emplacement 
memoire adresse par DE) 



Octet 1 : 1A 



-. m 



Indicateurs : aucun effet. 

LD HL, (nn) (Chargement de HL a partir de I'emplacement memoire 
d'adresse nn) (hfl) *^* WL. 

Octet 1 : 2A a ( \\) 

Octet 2 : adresse, poids faible t» 

Octet 3 : adresse, poids fort H \ ' *' 

Description . Le contenu de I'emplacement memoire dont I'adresse 
est specifiee est charge dans le registre L. Le contenu de I'emplace- 
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ment memoire suivant immediatement le precedent est h 
Indicateurs : aucun effet. 

LD (HI), r (Chargement de I'emplacement memoire adresse par HL ' 
parti r du registre r) 

U*<J> C 4\Z H 4\% ) CwO ( MSX A A L ) 

Octet 1 : selon registre (A:77 - B:70 - C:71 - D:72 - E 73 - ^74 

-1:75) 

Indicateurs : aucun effet. N 

/.D (IX+d), r (Chargement de I'emplacement memoire d'adresse IX + d 
a partir du registre r) 

Octet 1 : DD = {**■<) &*))(«*.) WW (M*i) (-MS) U 

Octet 2 : selon registre (A:77 - B:70 - C:71 - D:72 - E:73 - H:74 
-, L:75L 
, cfcW?:d 

Indicateurs : aucun effet. 

£D /A", fnnj (Chargement du registre IX a partir de I'emplacement 
memoire d'adresse nn) 

Octet 1 : DDrfb^N 
Octet 2: 2Ar£ U.V) 
Octet 3 : adresse, poids faible 
Octet 4 : adresse, poids fort 

Description : Le contenu de I'emplacement memoire dont I'adresse 
est specifiee est charge dans la partie basse du registre IX. Le 
contenu de I'emplacement memoire suivant immediatement le 
precedent est charge dans la partie haute. 

Indicateurs : aucun effet 

LDDR (Transfer! repetitif de bloc avec decrementation) 

Octet 1: ED :( Z^) A . 1)C-?t£V<£H$ W (?<1=GC 
Octet2:B8 i(/l ( L ) * ' t\l- Hi- -A £ « IP &C<*0 ^ 

Description : Le contenu de I'emplacement memoire adresse par 
HL est charge dans I'emplacement memoire adresse par DE. Les 
trois registres HL, DE et BC sont ensuite decremented Si BC est 
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different de 0, I'instruction est executee de nouveau. Sinon, le 
programme se poursuit en sequence. 

Indicateurs : aucun effet. 

LDIR (Transfert r£petitif de bloc avec incrementation) 

Octet 1: ED :(2^) 
Octet 2 : BO s ( s^q-i ) 

Description : Le contenu de I'emplacement memoire adresse par 
HL est charge dans I'emplacement memoire adresse par DE. Les 
registres HL et DE sont ensuite incremented, alors que BC est 
decremented Si BC est different de 0, I'instruction est executee de 
nouveau. Sinon le programme se poursuit en sequence. 

Indicateurs : aucun effet ^Jr(H «■) <> t * W A t^ftA 

POP qq (Depilement du registre double qq) , / _ „ » , „ . , \ 

ton) c-05) ui-v ( WJ 

Octet 1 : selon registre (BCC1 - DE:D1 - HLE1 - AF:F1) 

Description : La donnee situee au-dessus de la pile est enlevee et 
chargee dans le registre specific. 

Indicateurs : aucun effet. 

PUSH qq (Empilement du registre double qq) ...v (tkS') 

Octet 1 : selon registre (BCC5 - DE:D5 - HL:E5 - AF:F5) 

Description : Le contenu du registre specif ie est depose sur la pile 
(le registre reste malgre tout inchang^) 

*. 
Indicateurs : aucun effet. 

RET (Retour de sous-programme) 
Octet 1 : C9 s (tbA) 

Observation : Lorsque cette instructionl-est rencontree, I'adresse de 
retour du sous-programme est retiree de la pile. 

Indicateurs : aucun effet. 

RET cc (Retour conditionnel de sous-programme) „ v f -. , \ 

Octet 1 : selon condition (non nul : CO - nul : C8 - positif : F0 - 
negatif: ( F8^ 

tcvv\o : ruXui\m &k 2 
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Observation: Dans ce cas particulier, I'adresse de retour n'est 
retiree de la pile que si ce retour a effectivement lieu, done si la 
condition specifiee est remplie. 

Indicateurs : aucun effet. 

SBC HL, ss (Soustraire de HL le registre double ss) 

Octet 1 : ED * ( Z &%£() (gf) ft?) 

Octet 2 : selon registre (BC:42 - DE:52 - HL62) 

Description : Le contenu du registre double specif ie est soustrait 
du contenu du registre HL et le resultat est range dans HL (I'autre 
registre reste inchange). 

Indicateurs : S est Z sont modifies selon le resultat. 
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Nous esperons, naturellement, que cet ouvrage aura repondu a votre 
attente, et que vous aurez eprouve plus de plaisir que de peine a en 
suivre les meandres. 

Pour notre part, le but que nous nous etions fix£ serait atteint si, 
apres que vous ayez tourne la derniere page, vous vous rendiez compte 
que le "virus" vous a contamine, et que vous decidiez de vous mettre 
a faire vos propres programmes en langage machine. 

N'essayez pas, bien sur, de vous attaquer immediatement a des 
realisations trop ambitieuses (nous n'avons pas non plus appris le 
langage machine en deux jours), mais rappelez-vous qu'apres un 
minimum de pratique, vous ne serez plus limite que par votre propre 
imagination. 

A ceux qui, d'ores et deja, se sentiraient "mordus", nous donnerons 
deux ultimes conseils : 

• N'oubliez pas, d'abord. qu'une partie seulement des instructions du 
Z 80 a ete utilisee dans nos programmes. II en existe beaucoup 
d'autres, certes parfois plus complexes, mais toutes aussi excitantes 
et susceptibles de vous ouvrir des perspectives nouvelles. La premiere 
chose a faire est done sans doute d'acheter un ouvrage traitant ce 
sujet d'une maniere exhaustive. II deviendra vite, soyez-en sur, votre 
bible de reference. 

• Sachez egalement que vous trouverez grand profit a utiliser un 
programme assembleur (on en trouve pour I'Amstrad a des prix 
derisoires). Sans entrer dans les details, il suffit de savoir que 
I'assembleur permet une manipulation beaucoup plus facile des 
instructions. Par exemple, il utilise les mnemoniques au lieu des codes 
machine; il d<§livre le cas echeant des messages d'erreur au lieu de 
faire "tout sauter", ainsi que des listings comprehensibles et avec 
commentaires ; et surtout il permet ce que I'on appelle des break 
points, e'est-a-dire une verification de I'etat des registres et de la pile 
a tel ou tel moment precis du programme. 
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Quoiqu'il en soit, nous vous souhaitons bon courage et bons 
programmes pour vos confrontations futures avec ce langage qui, outre 
qu'il offre des possibilites extraordinaires, qui ne pourraient meme pas 
etre envisagees en BASIC, est bien le seul capable de procurer I'exaltante 
sensation de plonger veritablement dans les entrailles de la machine. 
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/ L'AmstradjCPC 464 est equipe d'un 
processeur Z80, fonctionnant a 
4 megahertz et disposant d'un jeu 
destructions extremement puissant. 
En outre, la qualite de son BASIC, tant 
du point de vue de la vitesse que du 
nombre d'instructions, range cette 
machine pa'rmi les plus performantes du 
marche. 

II n'en reste pas moins que le BASIC sera 
toujours le BASIC, avec ses inconvenients 
et ses limites. Qui, par exemple, n'a pas 
eprouve d'ameres deceptions en voyant 
un mobile se trainer sur I'ecran, avec 
force soubresauts, au terme d'un 
programme d'animation en BASIC ? 
De plus, on ne peut que regretter 
I'absence, sur I'Amstrad d'instructions 
telles que PAINT, CIRCLE, etc. , 
Cet ouvrage contient de nombreux 
_exemplps de programmes : / 

— Pause de X secondes. 

— Integration d'un programme 

— Dessin d'un quadrilatere. , 

— Defilement d'une ligne. 

— Dessin d'un cercle. 

— Cercle rapide. 

— Deplacement d'un mobile. 

— Tri de donnees alphanurtieriqOtes. ' 

— Ainsi qu'une bibliotheque d'utilitaires. 
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